63 Edits e 1 dilema!
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
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
Curtidas 0
Respostas
Rafael Mattos
24/07/2003
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;
i : Integer;
begin
for i := 0 to ComponentCount -1 do
if Components[i] is TEdit then begin
TEdit(Components[i]).Visible := FALSE;
end;
end;
GOSTEI 0
Imortal
24/07/2003
[b:8ca773c7e0]Toma ae garotinho de graça, nem vou perguntar pra q vc quer tá!!![/b:8ca773c7e0]
Imortal¬
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¬
GOSTEI 0