Einzelnen Beitrag anzeigen

Benutzerbild von Uncle Cracker
Uncle Cracker

Registriert seit: 30. Mär 2003
Ort: Freital
694 Beiträge
 
#5

Re: Anderes Programm komplett steuern

  Alt 25. Mai 2004, 22:16
Also ich habe das jetzt folgendermaßen hinbekommen:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  hMemo, hHandleDesFensters : HWND;
  s: string;
begin
  hHandleDesFensters := FindWindow(nil, 'ReCrackS.de');
  hMemo:= FindWindowEx(hHandleDesFensters, 0, 'Edit', nil);
  s := 'Test';
  SendMessage(hMemo, WM_SETTEXT, 0, Integer(@s[1]));
  hMemo:= FindWindowEx(hHandleDesFensters, 0, 'Button', nil);
  SendMessage(hMemo, BM_CLICK, 0, Integer(@s[1]));
end;
Funktioniert auch super, doch leider nur, wenn es ein Button und ein Edit gibt, bei mehreren passiert überhaupt nichts

Mit dem Button habe ich es hinbekommen, da suche ich nach der Buttoncaption, doch mit dem Edit klappt es nicht. Wie kann ich die suche nach einem Handle noch spezialisieren?
In dem einem Edit steht etwas drin, also könnte man danach suchen (wie weiß ich nicht), aber die andere ist komplett leer.

Könnte mir vielleicht nochmal jemand helfen und mir zeigen wie ich es machen könnte?


Danke UC
I wish it was legal to marry software because I'm madly in love with Delphi...
  Mit Zitat antworten Zitat