Enter-Taste im Java-fenster simulieren

[Pegasus0211]

Zitat von mkinzler:

Das funktioniert so nicht, da Java ja keine Windowsobjekte (Fenster) verwendet. Das ist auch gar nicht gewünscht, dass man die UI Elemente von aussen bedient. Java implementiert ja eine Sandbox

Hallo,

danke für Deine schnelle Antwort.

Der Text wird aber fehlerfrei positioniert.


Hier ist der komplette Code.

Delphi-Quellcode:

procedure TForm1.Button5Click(Sender: TObject);

 var
  wndMain, wndChild: HWND;
  i   : Integer;
  s   : string;
 begin
  wndMain := FindWindow('SunAwtFrame','Channel: /test');
  if wndMain <> 0 then
  begin
    wndChild := FindWindowEx(wndMain, 0, 'SunAwtCanvas', nil);
    wndChild := FindWindowEx(wndChild, 0, 'Edit', nil);
    if wndChild <> 0 then
    begin
      ShowMessage('Window Handle: ' + IntToStr(wndChild));
    s := 'ABC';
    SendMessage(wndChild, WM_SETTEXT, 0, Integer(PChar(s)));
    SendMessage(wndChild,WM_Char,VK_Return,0); //Enter Taste simulieren

    end;
  end;
 end;

Gruß Bernd

[daywalker9]

Wenn überhaupt:

Delphi-Quellcode:

SendMessage(handle,WM_KEYDOWN,VK_RETURN,0);
SendMessage(handle,WM_KEYUP,VK_RETURN,0);

[Pegasus0211]

@daywalker9

Danke für den Tipp; aber auch das funktioniert nicht; der Text steht im Editfeld und wird nicht gesendet.

Gruß Bernd