Tüm Editlere Veya Butonlara Aynı Anda İşlem

[gloryboy]

Formumda bir sürü edit bir sürü buton var ben bir kerede hepsinin enable özelliğinin false olmasını istiyorum msl bunu mümkünmüdür yoksa tek tek uğraşacakmıyım ?

[husonet]

Bir Döngüyle halledebilirsin

Kod: Tümünü seç

var
  i:integer;
  Comp:TObject;
begin
    for i:=0 to xForm.ComponentCount -1 do
    begin
      comp := xForm.Components[i];
      if (comp is TEdit) then
        TEdit(comp).Enabled := false;
    end;

Kolay Gelsin...

[aslangeri]

veya bu edit ve butonları koyduğun panel,gb, vs bileşenin enabledini false yaparsın.

[gloryboy]

teşekkürler