Einzelnen Beitrag anzeigen

delphi_newbie_123

Registriert seit: 14. Jan 2004
181 Beiträge
 
Delphi 5 Enterprise
 
#3

Re: Befehle an eine andere Anwendung versenden

  Alt 4. Dez 2004, 01:17
hi, danke, war schelcht von mir in dem beispiel.
var soll nur eine variable symboliesieren
hier nochmal der code:
Delphi-Quellcode:
procedure TForm1.Timer16Timer(Sender: TObject);
var
handle:integer;
begin
 handle:=findwindow(nil, pchar(anwendung));
 SendMessage(handle, WM_KEYDOWN, vkkeyscan('a'), 0);
 SendMessage(handle, WM_KEYUP, vkkeyscan('a'), 0);
end;
anwendung ist ein string, der den namen der betroffenen anwendung trägt
  Mit Zitat antworten Zitat