Как работать с HTML страницой?

← →
sdram (2006-05-23 15:28) [0]

Подскажите как сохранить в текстовой переменной - текст HTML документа например "http://www.delphimaster.ru/articles4.html". А если кто знает подскажите как с ним проще работать (с таблицами и т.д. в виде обьектов, и возможно ли такое).

← →
Elen © (2006-05-23 15:30) [1]

Пробуй через TWebBrowser и иже с ним

← →
MsGuns © (2006-05-23 15:41) [2]

Сохранить просто - Выбрать "Сохранить как" и "Тип файла" = "Текстовый файл".
Хотя в блокнот прекрасно грузится и хатмель в натуральную величину ;)

90% известных мне веб-дизайнеров работают с хатмелем с помощью простого блокнота.

← →
sdram (2006-05-23 15:42) [3]

Пробую да пока безрезультатно вот и режил живых примеров попросить.
Из того что нашел:

procedure TForm1.BitBtn1Click(Sender: TObject);
var
ps: IPersistStreamInit;
ss: TStringStream;
sa: IStream;
bResult: boolean;
begin
ps := WebBrowser1.Document as IPersistStreamInit;
ss := TStringStream.Create(s);
try
sa := TStreamAdapter.Create(ss, soReference) as IStream;
bResult := Succeeded(ps.Save(sa, True));
if bResult then
Memo.Text := WideCharLenToString(PWidechar(ss.Datastring),
Length(ss.Datastring));
finally
ss.Free;
end;
end;

Но!!!
[Error] Undeclared identifier: "IPersistStreamInit"

← →
Elen © (2006-05-23 16:22) [4]

ps := WebBrowser1.Document as IPersistStreamInit;
попробуй замени на
ps := IPersistStreamInit(WebBrowser1.Document) ;

← →
sdram (2006-05-23 17:38) [5]

Ругается на

var ps: IPersistStreamInit;

не находит откуда такое IPersistStreamInit

← →
saxon (2006-05-23 18:00) [6]

uses ActiveX;

← →
sdram (2006-05-24 15:27) [7]

да так заработало но результатом стала какая-то чуждая разуму кодировка типа:
?????????????????????‰?????????????????????????????????????????????????????????? ????????•???????•??????????????????????????????????????????????????????????????? ???????????????????????????????????????????????????????????????????????????????? ??????????????????????•????????????????????????????????????????????????????????? •??????????????????????????????????????????????????????????????????????????????? ???????????????????????•???????????????????????????????????????????????????????? ???????????????????????????????????????????????????????????????????????????????? ??????????????????????????????????????????????????????????‰

как ее побороть(преобразовать в удобочитаемую)?

← →
saxon (2006-05-24 15:53) [8]

пробуй так
http://www.swissdelphicenter.ch/en/showcode.php?id=2054

← →
sdram (2006-05-24 17:40) [9]

Да, это то что нужно. Спасибо!
если бы еще на вторую часть вопроса нашелся бы ответ благодарности не было бы границ.

> А если кто знает подскажите как с ним проще работать (с
> таблицами и т.д. в виде обьектов, и возможно ли такое).

← →
saxon (2006-05-24 17:44) [10]

Что значит с ним проще работать ? Чем IHTMLElement не устраивает (или DOM)?

← →
sdram (2006-05-25 13:59) [11]

Undeclared identifier: "IHTMLElement
и где найти MSHTML_TLB, ComCtrls ?

← →
saxon (2006-05-25 14:15) [12]

MSHTML_TLB - Components/Install ActiveX Control

пробуй пользоваться поисковиками - быстрее сделаешь

← →
saxon (2006-05-25 14:18) [13]

MSHTML_TLB - C:\WINDOWS\system32\mshtml.tlb

Для таблиц смотри на такой интерфейс IHTMLTable
получишь возможность управлять Rows, Cells
IHTMLTable + QueryInterface

← →
sdram (2006-05-25 17:54) [15]

Добавил эту библиотеку, а по ней ту мэни эрор
не находит тучу разных обьявлений ?

Как работать с HTML страницой? Найти похожие ветки