Einzelnen Beitrag anzeigen

taktaky
(Gast)

n/a Beiträge
 
#1

LoadHTMLToWebBrowser(Webbrowser1,'01.htm');

  Alt 13. Sep 2007, 12:27
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.
  Mit Zitat antworten Zitat