![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
||||
|
||||
|
И так сразу к вопросам:
1. Как сохранить страничку из TWebBrouser используя TSaveDialog 2. Как TWebBrouser заставить работать автономно (где енто свойство) ![]() |
|
#2
|
||||
|
||||
|
Вот пример: http://www.delphisources.ru/files/so..._web_brows.zip
Если надо могу исчо парочку выслать. |
|
#3
|
||||
|
||||
|
Неа, там ниченго подобного нет.
Самое главное - КАК РАБОТАТЬ АВТОНОМНО. |
|
#4
|
||||
|
||||
|
1:
Код:
procedure SaveHTMLSourceToFile( WB: TWebBrowser );
begin
try
WB.ExecWB( 4, 0 );
except
on E: Exception do
E.Create( 'Ошибка при сохранении HTML файла' );
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
SaveHTMLSourceToFile( WebBrowser1 );
end;Тут я не уверен, но учитывая, что TWebBrowser основан на движке IE, может сработать. [HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre nt Version\Internet Settings] "GlobalUserOffline"=dword:00000000 - в любом режиме "GlobalUserOffline"=dword:00000001 - в автономном режиме |
|
#5
|
||||
|
||||
|
Так, огроМММММное спасибо. Сейчас буду пробовать.
![]() |