Registriert seit: 29. Nov 2003
Ort: San Diego, CA/USA
1.446 Beiträge
Delphi 2006 Architect
|
Re: Fremdprogramm, Button drücken, ID bekannt???
4. Aug 2009, 06:30
So mache ich es bei einem Programm das alle 2 Minuten meint mir einen Screen zu zeigen obwohls Freeware ist.
Delphi-Quellcode:
procedure TfoMain.Timer1Timer(Sender: TObject);
var
WndMain, WndChild: HWND;
begin
WndMain := FindWindow(nil, 'Hier Titel des Windows einsetzen'); //'#32770'
if WndMain <> 0 then
begin
WndChild := FindWindowEx(WndMain, 0, 'Button', 'Caption des Buttons einsetzen. Falls ein Buchstabe einen Unterstrich hat, ein & benuzten');
if WndChild <> 0 then
begin
SendMessage(WndChild, BM_CLICK, 2, 0);
end;
end;
end;
Um etwas Neues zu schaffen muss man seine Ohren vor den Nein-sagern verschliessen um seinen Geist öffnen zu können.
(George Lukas)
|
|
Zitat
|