También puedes utilizar el metodo
TButton.Click
La diferencia con la otra forma es que se asigna el ModalResult que tenga el botón al que le haces click y luego se ejecuta su código OnClick.
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
...
Button2.Click;
Button3.Click;
...
end;
Del Help de Delphi6
Cita:
Simulates a mouse click, as if the user had clicked the button.
procedure Click; override;
Description
Calling Click assigns the value of the button’s ModalResult property to the ModalResult property of its parent form, and then generates an OnClick event.
|