Is ja lustig ^^
ich arbeite gerade auch an solch einem programm
also ich habs so gemacht:
Delphi-Quellcode:
//Variablen: wnd: HWND;
//s: String;
//i:Integer;
begin:
//Ich hab einfach mal schon wnd als irgendein Channel definiert, ok
//Dann in das Applet wecheln
wnd := FindWindowEx(wnd,0,'SunAwtCanvas',nil);
//und jetzt zum Edit-Feld springen
wnd := FindWindowEx(wnd,0,'Edit',nil);
//dann [i]Text[/i] senden
s := 'Beispieltext zum Senden!';
For i := 1 to Length(s) do SendMessage(wnd, WM_CHAR, Word(s[i]), 0);
PostMessage(wnd, WM_KEYDOWN , VK_RETURN, 0);
Dann wird s in das Applet geschrieben und abgesendet.
Doch auch das funktioniert nur, wenn das Applet den Focus hat
Nimmt man das selbe nur mit z.B. Notepad, funktioniert es auch einfach ohne den Focus zu haben.
PS: Du kannst auch einfach dem Channel-Fenster den Focus geben:
SetForeGroundWindow(wnd);
Aber bei mir soll ja genau das nicht sein.
