[TRUCO DELPHI] Limpiar todos los controles TEdits de un Formulario.
delphi
procedure ClearEdits; var i : Integer; begin for i := 0 to ComponentCount-1 do if (Components[i] is TEdit) then (Components[i] as TEdit).Text := ''; end;
Saludos!
Escrito 31 agosto 2016 - 12:53
[TRUCO DELPHI] Limpiar todos los controles TEdits de un Formulario.
procedure ClearEdits; var i : Integer; begin for i := 0 to ComponentCount-1 do if (Components[i] is TEdit) then (Components[i] as TEdit).Text := ''; end;
Saludos!