Erstellen TWebBrowser in Runtime mit Delphi

Habe ich einen TWebBrowser-Objekt, das erstellt wird, in der Laufzeit und verwendet im hintergrund, nicht sichtbar. Das problem ist, dass es Veranstaltungen wie OnDocumentComplete funktionieren nicht oder werden nicht ausgelöst, in Delphi2009. Irgendwelche Ratschläge?

procedure TfrmMain.FormCreate(Sender: TObject);
begin
  FWebBrowser:= TWebBrowser.Create(Self);
  FWebBrowser.RegisterAsBrowser:= True;
  FWebBrowser.OnDocumentComplete:= WhenDocIsCompleted;
end;

procedure TfrmMain.WhenDocIsCompleted(ASender: TObject; const pDisp: IDispatch;
  var URL: OleVariant);
begin
  ShowMessage('Doc is completed!');
end;

Gibt es keinen Unterschied wichtig zwischen Navigieren und Navigate2? Wie kann ich cookies aktivieren hier?

Vielen Dank im Voraus.

  • Nicht wirklich eine Antwort auf deine Frage, aber warum würdest du mit TWebBrowser wenn Sie es nicht verwenden, für die Anzeige? Wäre nicht besser, nur bekommen Sie es mit einem HTTP-Client-Komponente wie Indy TIdHTTP oder die WinInet-API, die verwendet die gleichen Einstellungen wie der IE. Siehe stackoverflow.com/questions/1823542/...
  • Ich habe TidHTTP und TidCokkieManager aber Probleme mit cookies, so sah ich TWebBrowser wie eine Lösung, aber nach den tests hat es den gleichen problem.
  • Also, was ist die Frage? Ist es über die cookies, oder das Ereignis? Vielleicht ist es am besten, wenn Sie getrennt auf beide Fragen.
InformationsquelleAutor Billiardo Aragorn | 2009-12-27
  1. 4
    TWinControl(FWebBrowser).Parent := Form1;  // Parent property is read-only unless cast
    InformationsquelleAutor tomo7
  2. 2

    Können Sie dieses Problem haben, da die TWebBrowser arbeitet intern eng zusammen mit dem handle des übergeordneten Formular aus, um Nachrichten von windows. Versuchen Sie es mit einem versteckten Formular, mit dem TWebBrowser auf (Optional run-Zeit sowie erstellt), und/oder zu untersuchen, wenn die HandleAllocated und HandleNeeded Methoden könnten Ihnen helfen.

    InformationsquelleAutor Stijn Sanders
  3. 2

    Call für das OnDocumentComplete Problem:

    WebBrowser1.HandleNeeded;

    oder in deinem Fall:

    FWebBrowser.HandleNeeded;

    bevor Sie den Web-Browser.Navigieren Sie

    InformationsquelleAutor Ingo
  4. 1

    Einer Komponente arbeitet perfekt mit dem web-Seiten mit cookies ist TEmbeddedWB von EmbeddedWB und ist kostenlos.

    • Ich kann nicht zugreifen EmbeddedWB website für lange Zeit. Ich habe die Quellen und Im mit in für Delphi 2010, auch ich haben sich verbessert, einige Teile und einige Fehler behoben.
    InformationsquelleAutor Billiardo Aragorn
  5. 1
    procedure TForm1.ReCreateBrowser();
begin
    if(WebBrowser <> NIL) then
    begin
       WebBrowser.Stop;
       WebBrowser.Destroy;
    end;

    WebBrowser        := TWebBrowser.Create(Form1);
    TWinControl(WebBrowser).Name   := 'WebBrowser';
    TWinControl(WebBrowser).Parent := Form1; //set parent...can be panel, tabs etc
    WebBrowser.Silent := true;  //don't show JS errors
    WebBrowser.Visible:= true;  //visible...by default true

    //don't set width/heigh/top/left before TWinControl(WebBrowser).Parent := Form1;
    WebBrowser.Top    := 10;
    WebBrowser.Left   := 10;
    WebBrowser.Height := 600;
    WebBrowser.Width  := 800;
    WebBrowser.OnDocumentComplete  := WebBrowserDocumentComplete;
  //WebBrowser.OnNavigateComplete2 := WebBrowserNavigateComplete2;
end;
    InformationsquelleAutor Vladimir Miroshnichenko
Schreibe einen Kommentar