Einzelnen Beitrag anzeigen

endeffects

Registriert seit: 27. Jun 2004
450 Beiträge
 
#13

Re: TWebBrowser < undefinierter Bezeichner

  Alt 11. Aug 2004, 15:09
hallo, danke für die hilfe, das sleep hier eher unangebracht ist war mir schon
klar, das dadurch allerdings diese zugriffsverletzung verursacht wird ist mir neu,

wie zu erwarten war funktioniert der aufruf Application.ProcessMessages;
in den threads nicht der einbau von OnDocumentComplete ist mir auch ein rätsel

Delphi-Quellcode:
procedure TMyThreads.Grabber();
var
  WebBrowser: TWebBrowser;
begin
  OleInitialize(nil);
  WebBrowser:= TWebBrowser.Create(nil);
  with WebBrowser do
    try
      Navigate('http://www.google.com');
      OnDocumentComplete:= //?????? OleObject.Document.Forms.item(0).submit; ??????///

    except
        //nix
    end;
  Fstatus:= 'done.';
  Synchronize(UpdateLVCaption);
  FreeAndNil(WebBrowser);
  OleUninitialize;
end;
  Mit Zitat antworten Zitat