Как вставить HTML страницу в Delphi приложение?

[Valdis]

Хочу оформить прогу так, чтобы в оболочке проги под дельфи был виден HTML файл. Скачал HTMLutils, но там без толстой книги по руководству не разобраться. HTMLpaser - аналогично. Ну есть же способ?! похожее можно в авторанах увидеть.

[Alex21]

Чтобы не париться с ресурсами - можно созданную страницу загружать в WebBrowser, или генерировать в процессе выполнения программы все в томже компоненте.

[Valdis]

Друг, подкинь нужный код - как это сделать? У меня получилось так: WebBrowser отображает страницу из инета (

[Alex21]

WebBrowser.Navigate(адрес с диска)

[Valdis]

Это будет работать если указывать только абсолютную ссылку. Можно ли сделать ссылку относительной или вообще внедрить струницу в exe'шник?

[Alex21]

Тут посмотри. Про генерацию HTML,
а относительные ссылки - ExtractFilePath(Application.ExeName );

[Квэнди]

Страница статична ?
если да, то что тебе мешает забить текст в Tstringlist а для отображения в Webbrowser используй код:
uses
ActiveX;

procedure WB_LoadHTML(WebBrowser: TWebBrowser; HTMLCode: string);
var
sl: TStringList;
ms: TMemoryStream;
begin
WebBrowser.Navigate('about:blank');
while WebBrowser.ReadyState < READYSTATE_INTERACTIVE do
Application.ProcessMessages;

if Assigned(WebBrowser.Document) then
begin
sl := TStringList.Create;
try
ms := TMemoryStream.Create;
try
sl.Text := HTMLCode;
sl.SaveToStream(ms);
ms.Seek(0, 0);
(WebBrowser.Document as
IPersistStreamInit).Load(TStreamAda pter.Create(ms));
finally
ms.Free;
end;
finally
sl.Free;
end;
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
WB_LoadHTML(WebBrowser1, 'SwissDelphiCenter');
end;

[Valdis]

Спасибо за все. Нашел аналогичный пример, да еще и гораздо с большими возможностями. Если надо скину )около мега(.