(Resolvido) TEdit

[mayconvm]

Saudações!

Galera, sou iniciante em delphi, e criei o meu primeiro sistema de cadastro, so que depois de cadastrar os dados dos campos não somem, como que eu faço para poder limpar, são mais de 30 campos.

[Daniel Sanches]

com o código abaixo você limpa todos os edits do form1 ....

procedure TForm1.Button1Click(Sender: TObject);
var
I: word;
begin
        for I:=0 to form1.ComponentCount-1 do
                if form1.Components[I].ClassType = TEdit then
                        (form1.Components[I] as TEdit).Clear;
end;

[mayconvm]

Moço brigadao... funcionou direitinho... :)