[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!
Posted 31 August 2016 - 12:53 PM
[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!