Einzelnen Beitrag anzeigen

Esolit

Registriert seit: 27. Jun 2005
5 Beiträge
 
#1

Postmessage Befehl an WebBrowser-Komponente?

  Alt 27. Jun 2005, 17:21
Hi,

was ist an folgendem Quelltext falsch? Ich lege erst den Fokus meinen Programmes auf das Dokument im WebBrowser und versuche dann einen Tastenbefehl (im Beispiel Tabulator-Taste) an diese zu schicken. Nur irgendwie wird das jedes mal so interpretiert als wenn der Befehl an die Form geschickt worden wäre. Stimmt vielleicht der Klassenname des WebBrowsers nicht?

Delphi-Quellcode:
procedure TForm1.Button4Click(Sender: TObject);
var
wnd : HWND;
begin
wnd := FindWindow('TForm1',nil);
if wnd <> 0 then
begin
wnd := FindWindowEx(wnd,0,'TWebBrowser1',nil);
(Webbrowser1.Document as IHTMLDocument2).ParentWindow.Focus;
 PostMessage(wnd, WM_KEYDOWN , VK_Tab, 0);
end else showmessage('Not Found');
end;
Beste Grüße
  Mit Zitat antworten Zitat