Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.09;
Скачать: CL | DM;

Вниз

Как принудительно выйти из авторомного режима в TWebBrowser?   Найти похожие ветки 

 
kofman ©   (2002-11-10 00:11) [0]

Помогите советом, я закачиваю с помощью TWebBrowser страничку, но если Internet Explorer у меня находится в автономном режиме, то выскакивает окно с просьбой "подключится к Интернет, т.к. данная страница не доступна в автономном режиме". Мастаки, как сделать, что бы это окно не появлялась? Может есть способ принудительно вывести IE из автономного режима или хотябы узнать, что браузер находится в автономном режиме - я тогда и закачивать не буду? Заранее спасибо.


 
kofman ©   (2002-11-10 14:29) [1]

Мастера помогите!!!!!


 
int64 ©   (2002-11-10 20:59) [2]

uses ..., WinInet;
...
procedure SetGlobalOffline(Value: Boolean);
const
INTERNET_STATE_DISCONNECTED_BY_USER = $10;
ISO_FORCE_DISCONNECTED = $1;
INTERNET_STATE_CONNECTED = $1;
var
ci: TInternetConnectedInfo;
dwSize: DWORD;
begin
dwSize := SizeOf(ci);
if (Value) then begin
ci.dwConnectedState := INTERNET_STATE_DISCONNECTED_BY_USER;
ci.dwFlags := ISO_FORCE_DISCONNECTED;
end else begin
ci.dwFlags := 0;
ci.dwConnectedState := INTERNET_STATE_CONNECTED;
end;
InternetSetOption(nil, INTERNET_OPTION_CONNECTED_STATE, @ci, dwSize);
end;


SetGlobalOffline(TRUE) = Work Offline;

SetglobalOffline(FALSE)= Work Online;

P.S. Юзайте TEmbeddedWB.


 
kofman ©   (2002-11-10 22:26) [3]

>int64 это как раз то что нужно, огромное Вам спасибо.



Страницы: 1 вся ветка

Текущий архив: 2003.01.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
7-25110
HardJ
2002-10-30 10:39
2003.01.09
CTRL+ALT+DELETE в NT-ях


3-24818
XM-AD
2002-12-17 10:17
2003.01.09
Снова кодировки! Что не правильно?


3-24763
ru_maxim
2002-12-16 00:29
2003.01.09
Ккалькуляция в TDataSet


4-25143
chips
2002-11-21 12:52
2003.01.09
handle controlов в чужой программе


1-24843
Сергей
2002-12-25 20:39
2003.01.09
Странное поведение AssignFile( ) - короче не работает, а почему?