Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ищу компонент - HTML viewer

Кулюкин Олег © (2002-04-05 08:56:00)
Приветствую.
Ситуация такова - в базе храняться описания в формате HTML, нужно отображать их не клиенте.
Хотел использовать TWebBrowser из стандартного набора, но для работы с ним нужно создавать на диске временный файл, а потом открывать его. Этого делать не хочется.
Не посоветуете ли недорогой или бесплатный компонент для отображение HTML (без фреймов :), чтобы он в качестве аргумента требовал не путь к файлу, а строку с HTML.

PS. Про торри.ру я знаю, меня интересует мнение людей, которые сами поработали с такими компонентами.

zondor (2002-04-10 19:46:00) [1]
A menja diko interesujet po4emu etot komponent ne vidno v Adresnom Prostranstve WIN .... o4enj stranno ..

Кулюкин Олег (2002-04-10 14:58:00) [2]
2 vrRaven (06.04.02 19:33)
THtmlViewer весьма хорош.
Докрутил - стало возможнозадавать HТML в виде строки.

2 zondor © (10.04.02 13:49)
Подключил DHTML Editing Component.
Осталось найти способ запретить редактирование.

zondor (2002-04-10 13:49:00) [3]
Posmotri standartnije ActivX controlsi ( Instal new Active X control ) tam estj DHTML edit i Vijuver ---- o4enj prigoditsa ja dumaju !! derzaj

vrRaven (2002-04-06 19:33:00) [4]
А зачем так мучатся??

www.pbear.com

там есть компонент THtmlViewer (и его потомки)
он примерно как RichEdit работает, но с html

Кулюкин Олег (2002-04-05 15:17:00) [5]
Нашел ошибку.
Просто у меня чистая страничка не успевала открыться.
надо было подождать

if WebBrowser1.Document = nil then
WebBrowser1.Navigate("about:blank");
while WebBrowser1.ReadyState < READYSTATE_INTERACTIVE do
Forms.Application.ProcessMessages;

Кулюкин Олег (2002-04-05 14:50:00) [6]
Пробовал :((
WebBrowser1.Document всегда равен nil (даже если в WebBrowser1 открыт документ)

viv (2002-04-05 11:21:00) [7]
а так не пробывал?

type
TForm1 = class(TForm)
Button1: TButton;
WebBrowser: TWebBrowser;
procedure Button1Click(Sender: TObject);
private
public
end;

procedure TForm1.Button1Click(Sender: TObject);
var
Doc: OleVariant;
begin
WebBrowser.Navigate("about:blank");
Doc := WebBrowser.Document;
Doc.Write("<html><body>Oops!</body></html>");
end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »