Einzelnen Beitrag anzeigen

Cyf

Registriert seit: 30. Mai 2008
407 Beiträge
 
Lazarus
 
#22

Re: String an anderes Programm schicken

  Alt 10. Jul 2008, 14:13
So, mit den Infos kann man doch schon mehr anfangen

Dann kann man auch konkret helfen, noch ein kleines Beispiel wie sowas aussehen kann, hier eine procedure die z.B eine '0' in ein neues Editor-Fenster schreibt (muss offfen sein), allerdings musst du erst rausfinden, wie bei dir das Eingabefeld heißt:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var Window: HWND;
begin
  Window := FindWindow('Notepad','Unbenannt - Editor');
  if Window <> 0 then
  begin
    Window := FindWindowEx(Window, 0, 'Edit', nil);
    PostMessage(Window, WM_KEYDOWN, 48, 0);
  end
  else showmessage('Konnte das Editorfenster nicht finden!');
end;
  Mit Zitat antworten Zitat