Hallo,
ich habe einige
html-Dateien mit exe gepackt. Auf Form habe ich einen Webbrowser1
Nun möchte ich eine
html in meinen Webbrwoser1 laden
Der
html-Name wird in der ListBox1 auch gelistet
wie kann ich die
html Datei (die mit exe gepackt) in Webbrwoser laden?
ich habe so versucht:
Delphi-Quellcode:
//webbrwoser funktion
procedure LoadHTMLToWebbrowser(AWebBrowser: TWebBrowser; AHTMLCode: TStrings);
var
myDocument:OleVariant;
begin
//falls nötig, leere Seite anzeigen
if AWebBrowser.Document =
nil then AWebBrowser.Navigate('
about:blank');
//HTML-Code in TWebBrowser.Document schreiben
myDocument:=AWebBrowser.Document;
myDocument.Clear;
myDocument.
Write(AHTMLCode.Text);
myDocument.Close;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
LoadHTMLToWebBrowser(Webbrowser1,ListBox1.Items);
//wird leider nur den html-Namen in Webbrowser angezeigt
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
LoadHTMLToWebBrowser(Webbrowser1,'
01.htm');
// geht auch nicht
end;
end.