Thema: Delphi FindWindowEx und Notepad

Einzelnen Beitrag anzeigen

Benutzerbild von Mazel
Mazel

Registriert seit: 11. Nov 2005
Ort: Leipzig
831 Beiträge
 
#1

FindWindowEx und Notepad

  Alt 16. Dez 2006, 15:37
Hallo,

ich möchte, wenn der Editor geöffnet ist, einen Text hinein schreiben. Mit FindWindow erhalte ich über den Namen das Handle, nun dachte ich über FindWindowEx das Feld ermitteln zu können, nur leider kenn ich die Komponente nicht die verwendet wird. Hat jemand eine Idee, wie ich das lösen kann?
Delphi-Quellcode:
var
  wnd: THandle;
  obj: THandle;

procedure TForm1.Button1Click(Sender: TObject);
begin
  wnd := FindWindow(nil , PChar('Unbenannt - Editor'));
  if wnd <> 0 then Label1.Caption := inttostr(wnd);
  obj := FindWindowEx(wnd, 0, 'TMemo', nil);
  if obj <> 0 then Label2.Caption := inttostr(obj);
end;
Gruß
Mazel
Marcel Jänicke
www.mj-software.net
  Mit Zitat antworten Zitat