also hab das jetzt mal folgender maßen:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var EditHandle, WindowHandle: HWND;
begin
windowhandle:= FindWindow('__oxFrame.class__',nil);
windowhandle:= FindWindowEx(windowhandle, 0, '__oxFrame.class__', nil);
windowhandle := FindWindowEx(windowhandle, 0, 'Internet Explorer_Server', nil);
EditHandle := FindWindowEx(WindowHandle, 0, 'RichEdit20A', nil);
SendMessage(edithandle, WM_SETTEXT, 0, Integer(PChar(memo2.Text)));
memo1.Text:=inttostr(windowhandle)
end;
Der Scheint aber RichEdit20A nicht zu kennen, weil als ich mir dann windowhandle mal ausgegeben lassen habe kam ein wert raus, doch ab EditHandle, sprich also bei RichEdit20A kam 0 raus