tag kullanımı

[hdayi]

Merhabalar,
Bir tuşa basıldığında, bir grup dbedit ve label'ı taglarına göre visible yapmak istiyorum. Dbeditlere ve label'lara ayrı ayrı taglar verdim. Tag'ı şu olanları visible yap diyeceğim de nasıl.

[naile]

Kod: Tümünü seç

  for k:= 0 to form1.ComponentCount-1 do
    begin
      if((form1.Components[k].ClassName)='TEdit')then
        if TEdit(form1.Components[k]).Tag = 0 then 
           TEdit(form1.Components[k]).Visible := false
    end;

Form üzerindeki bütün componentlere bakar bu döngü içerisinde.Burda TEdit için ve sadece tag 0 için bir örnek, bunu geliştirebilirsin.

Kolay gelsin.

[hdayi]

Teşekkürler Süper hızlısınız. Bu kadar çabuk bir cevap beklemiyordum doğrusu. Bu arada bir arkadaştan benzeri bir kod buldum.

for i:=0 to frmmalrejimi.ControlCount-1
do begin
if frmmalrejimi.Controls.Tag=1
then frmmalrejimi.Controls.Visible:=True;
end; {for}

[naile]

Rica ederiz, zaten delphiturkiye.com un da en büyük özelliği hızlı olması

Sonucu bildirdiğiniz içinde ayrıca biz teşekkür ederiz