Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#3

Re: Komm nicht mir dem Webbrower klar :(

  Alt 12. Dez 2006, 17:53
Zitat von NightFox:
Nun ja mit dem webbrowser in delphi hab ich noch so meine schwiegigkeiten, weiss nicht was ich da machen soll dass das programm eine seite anzeigt
Delphi-Quellcode:
procedure TFrmHTMLUpload.Navigate;
var
  BrowserFlags : olevariant;
  MyTargetFrameName : olevariant;
  MyPostaData : olevariant;
  MyHeaders : olevariant;
begin
{ Flags:
Constant            Value Meaning
NavOpenInNewWindow  $01 Open the resource or file in a new window.
NavNoHistory        $02 Do not add the resource or file to the history list. The new page replaces the current page in the list.
NavNoReadFromCache  $04 Do not read from the disk cache for this navigation.
NavNoWriteToCache    $08 Do not write the results of this navigation to the disk cache.
NavAllowAutosearch  $10 If the navigation fails, the Web browser attempts to navigate common root domains (.com, .org, and so on). If this still fails, the URL is passed to a search engine.
}

  BrowserFlags := $02;
  MyTargetFrameName := null;
  MyPostaData := null;
  MyHeaders := null;

  // Seite besuchen
  Webbrowser1.Navigate(EdtURL.text, BrowserFlags,MyTargetFrameName,MyPostaData,MyHeaders);
  WaitForBrowser(WebBrowser1);
end;
Andreas