Ereignis "ButtonOnClick" simulieren wie?

[Shadowsong]

Ich will folgendes:

ich habe einen auslöser, in diesem fall einen mausklick auf die form1, und dieser auslöser soll jetzt einen Klick auf Button1 simulieren, woraufhin procedure button1OnClick ausgeführt werden soll.

Ich dachte so:

Code:

Form1.OnMouseClick (...)

begin

> simuliere Klick auf Button1 < ;

end;


====>  Button1OnClick wird aufgerufen

ich hab viele threads gefunden wie man Mausklicks simuliert, aber wie simuliere ich ButtonOnClick ??

DANKE IM VORAUS