Die .Navigate Methode hat mehr Parameter als nur die
URL.
Ausserdem wird ein OleString als Datentyp erwartet. Deshalb sollte man
Zwischenvariablen verwenden:
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;
Webbrowser1.Navigate(EdtURL.text, BrowserFlags,MyTargetFrameName,MyPostaData,MyHeaders);
// WaitForBrowser(WebBrowser1);
end;