->
Dicas
Modificar várias propriedades de um objeto ao mesmo tempo.
Utilize o comando with, desse modo:
With Edit1 do
begin
Text := ' @Delphi';
Widht := 30;
Enabled := True;
end;
