Código Delphi [-] For I := 0 to ComponentCount -1 do begin if (Components[i] is TEdit) then (Component[i] as TEdit).Text := ''; (Component[i] as TControl).Enabled := False; end; //for
For I := 0 to ComponentCount -1 do begin if (Components[i] is TEdit) then (Component[i] as TEdit).Text := ''; (Component[i] as TControl).Enabled := False; end; //for