Handle anderer Form und Komponente (Memo) - Text hinzufügen

[Khabarakh]

Zitat von Yheeky:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  hMemo, hHandleDesFensters : HWND;
begin
  hHandleDesFensters := FindWindow(nil, 'TestForm');
  hMemo:= FindWindowEx(hHandleDesFensters, 0, 'TMemo', nil);
  SendMessage(hMemo, HIER SUCHE ICH DIE MESSAGE, 0, Integer(@Edit1.Text[1]));
  SendMessage(hHandleDesFensters,WM_SYSCOMMAND,SC_RESTORE,0);
  SetForegroundWindow(hHandleDesFensters);

end;

Öhm, wenn Yheeky mit so etwas anfängt, handelt es sich wahrscheinlich um einen anderen Prozess .