como puedo borrar 100 edit

[ecfisa]

Empezado por MAXIUM

¿Y si los Edit están en otro Forma?

¿¿¿ Form3.Edit3.Text ???

Hola MAXIUM.

procedure TForm1.Button1Click(Sender: TObject);
var
  i : Integer;
begin
  with Form3 do
   for i:= 0 to ControlCount -1  do
     if Controls[i].ClassType = TEdit then
       TEdit(Controls[i]).Text:= '';
end;

Por supuesto debes incluir la Unit que declara a Form3.


Saludos.