Kullanılmaz haldeki formu kapatmak

[Yavuz]

Bir formun enablesi false yapıldığında form kullanılmaz hale geliyor. Ama bu şekildeki bir formu kendi üzerinden kapatmak mümkün olmuyor.
Ama ben formu kendi üzerinden kapatmak istiyorum Bunun için bir yöntem bilen varmı . Şeffaf bir nesnenin formun üzerine yayılıp enablesi false yapılabileceği aklıma geldi ama buna uygun bir bileşen bulamadım.
Tüm bileşenlerin false yapılması olabilir ama görüntülerinin pasif olmasını istemiyorum. Aynen formun enable olduğu durumdaki gibi görünmelerini istiyorum.
Bunun için yapılabilecek bir işlem var mı ?
Teşekkürler ...

[aslangeri]

s.a.
forma bir tane panel koy diğer tüm bileşenleri bu panelin üzerine koy.
(eğer kaydırma çubuklarına ihtiyacın oluyorsa scroolbox da olabilir) sonar bu panelin enable sini false yap.
kolay gelsin.

[ikutluay]

Bir formun enablesi false yapıldığında form kullanılmaz hale geliyor. Ama bu şekildeki bir formu kendi üzerinden kapatmak mümkün olmuyor.
Ama ben formu kendi üzerinden kapatmak istiyorum Bunun için bir yöntem bilen varmı . Şeffaf bir nesnenin formun üzerine yayılıp enablesi false yapılabileceği aklıma geldi ama buna uygun bir bileşen bulamadım.
Tüm bileşenlerin false yapılması olabilir ama görüntülerinin pasif olmasını istemiyorum. Aynen formun enable olduğu durumdaki gibi görünmelerini istiyorum.
Bunun için yapılabilecek bir işlem var mı ?
Teşekkürler ...

meraba
neden buna ihtiyac duyuyorsunki?

[Yavuz]

Admin/user tanımlı bir program için ihtiyaç duydum. Admin olmayanlar form üzerindeki nesneri aynen görsünler ama şifresiz işlem yapamasınlar istedim. Tek tek tüm elemanların enablesini değiştirmek ise çok dolambaçlı geldi.
aslangeri nin çözümü çok basit ve akıllıca.

ÇokTeşekkürler ...

[ulu coder]

tüm formlarla uğraşmak istemezseniz şunu bi prosedür haline getirip kullanabilirsiniz:

Kod: Tümünü seç

for i := 0 to Pred(ControlCount) do
  Controls[0].Enabled := False;

Tüm kontrollerin enable'ını false yapıp formunuzun enable'ının true kalmasını sağlayabilirsiniz =)

[ikutluay]

en uygun öneri aslangeri tarafından yapılmış. tüm kontrolleri gezmektense bir panel iyidir

[ulu coder]

en uygun öneri aslangeri tarafından yapılmış. tüm kontrolleri gezmektense bir panel iyidir

Neye göre iyi? =)

Aradaki farklar:
1) Bu kodu fonksiyon haline getirirseniz Panel.Enabled = bool yazacağınız yere SetControlsEnabled(Self, bool) gibi bi ifade yazarsınız biter. Formlardaki kontrolleri kesip, panel ekleyip, panelin özelliklerini ayarlayıp, kontrolleri tekrar paste etmek zorunda kalmazsınız. Ha, bu zaman farkı 10-15 form için bişi değil, ama form sayısı çoksa ve form inheritance filan kullanılmadıysa ölümcül olur.

2) Görünüm de farklı oluyor. Panel'in enable'ını false yaptığınızda misal editlerdeki yazılar gri olmuyor.

3) Formda TControl'den türetilmemiş bi kontrol varsa (olur olur) benim kod hatalı olur, TComponent'leri tarayıp o kontrole özel kod eklemek gerekir.

vs. vs...

Ben de @aslangeri'nin çözümü iyi değil demiyorum, her kod farklı yerlerde iyi.

Kolay gelsin...

Alttaki cevaba istinaden edit: düşündüğümden de fazla öznel bi konu, hayırlısı...

[ikutluay]

ben durum için konuştum... sizin kod kötüdür anlamında demedimki.