Mausklick auf einen Button simulieren |
|
| System | Win9x, WinNT, Win2000, WinXP, Vista, Win7 |
|---|---|
| Ab Delphi-Version | Delphi 1 |
| Letzte Änderung | 28.09.2010 |
Um einen Mausklick auf einen Button zu simulieren, senden Sie die WM_LBUTTONDOWN-Botschaft, um den Button zu drücken und anschließend die WM_LBUTTONUP-Nachricht, um ihn wieder loszulassen.Im folgenden Beispiel wird ein vollständiger Klick auf den Button "Button1" simuliert:
procedure TForm1.Button7Click(Sender: TObject);
begin
Button1.Perform(WM_LBUTTONDOWN, 0, 0);
Sleep(200);
Button1.Perform(WM_LBUTTONUP, 0, 0);
end;
Es werden auch die jeweiligen Maus- und Klick-Ereignisse ausgelöst.