Ver Mensaje Individual
  #4 (permalink)  
Antiguo 13/06/2003, 10:51
Avatar de JavierB
JavierB
Colaborador
 
Fecha de Ingreso: febrero-2002
Ubicación: Madrid
Mensajes: 25.052
Antigüedad: 23 años
Puntos: 772
Hola, arkam20.

Código:
var
  I: Integer;
begin
  for I:=0 to ComponentCount-1 do
    if (Components[I] is TEdit) then
      TEdit(Components[I]).Text:='';
Saludos,