Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

TWebBrowser: сорнанение HTML кода на диск. [D6, D7, Win95/98, WinME, Win2k, WinXP]


ST ©   (2003-01-31 15:42:00) 

Имеется нижеприведённый алгоритм сабжа, но имеется громадный и непонятный косяк: после его (т.е. алгоритма) использования TWebBrowser полностью и без объяснений отказывается переходить по ссылкам на странице. Помогите плз. исправить. Заранее благодарен за копию ответа на мыло: st@intbel.ru

procedure GetHtmlCode(WebBrowser: TWebBrowser; FileName: string);
var
htmlDoc: IHtmlDocument2;
PersistFile: IPersistFile;
begin
htmlDoc := WebBrowser.document as IHtmlDocument2;
PersistFile := HTMLDoc as IPersistFile;
PersistFile.save(StringToOleStr(FileName), true);
while htmlDoc.readyState <> "complete" do
Application.ProcessMessages;
end;


REA   (2003-01-31 15:43:00) [1]

А может ссылки относительные?


Наверх

Титульная страница Поиск, карта сайта Написать письмо