Fórum 63 Edits e 1 dilema! #171194

24/07/2003

0

Olá

Tenho 63 Edits em um Form, nao me pergunte o porque, como faço pra tornalos todos envisiveis sem ficar passando False na propriedade Visible em cada um?

Valeu!

Rafael


Raphal

Raphal

Responder

Posts

24/07/2003

Rafael Mattos

var
i : Integer;
begin
for i := 0 to ComponentCount -1 do
if Components[i] is TEdit then begin
TEdit(Components[i]).Visible := FALSE;
end;
end;


Responder

Gostei + 0

24/07/2003

Imortal

[b:8ca773c7e0]Toma ae garotinho de graça, nem vou perguntar pra q vc quer tá!!![/b:8ca773c7e0]


var
  i : Integer;
begin
  for i := 0 to Form1.ComponentCount-1 do
  begin
    if Form1.Components[i] is TEdit then
      (Form1.Components[i] as TEdit).Visible :=False;
  end;



Imortal¬


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar