Componentes Edit´s ou Maskedit´s Clear
Feras como dar um clear na propriedade Text de todos os componentes
Edit ou Maskedit´s?
Grato
Edit ou Maskedit´s?
Grato
Fabianoqi
Curtidas 0
Respostas
Heron Bonfim
18/02/2004
Procedure LimpaEdit;
Var
i : Integer;
begin
for i := 0 to ComponentCount -1 do
if Components[i] is TEdit then
begin
TEdit(Components[i]).Text := ´´;
end;
end;
Var
i : Integer;
begin
for i := 0 to ComponentCount -1 do
if Components[i] is TEdit then
begin
TEdit(Components[i]).Text := ´´;
end;
end;
GOSTEI 0