| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
проблемы с RAS [D6, Win95/98, WinXP]
Alexey © (2004-06-13 21:41:00)В своей проге для определения соединения с Инетом использую следующую процедуру
function status:boolean;
var TpRasCon:array[0..255] of tRasConna;
lg:Longint;
lpcon: Longint;
RetVal ,i: Longint;
Tstatus : tRasConnStatusA;
begin lpcon:= 0;
FillChar(tprascon, SizeOf(Trasconna), 0);
TpRasCon[0].dwSize := sizeof(tRasConnA);
lg:= 255 * TpRasCon[0].dwSize;
RetVal:= RasEnumConnections(@TpRasCon[0], lg, lpcon);
Tstatus.dwSize:= sizeof(tRasConnStatusA);
RetVal:= RasGetConnectStatus(TpRasCon[0].hRasConn, Tstatus);
if lpcon>0 then ;
If Tstatus.RasConnState = $2000 Then begin
result:= True; end
Else result:= false;
end;
и если была хотя бы попытка выйти в Инет(набор номера) или в Инет я всетаки вышел, то когда я хочу перезагрузить или выключить комп ничего не просходит (не перегружается)(моя прога постоянно сидит в трее), если же я свою прогу закрываю то все в порядке.
Уважаемые мастера подскажите.
Rouse_ (2004-06-26 19:43:00) [1]Ошибка не здесь...
BlackBaracuda (2004-06-26 19:40:00) [2]Как часто ты вызываешь эту функцию?
Alexey (2004-06-15 19:26:00) [3]Подскажите кто-нибудь в каком направлении искать ошибку. Пожалуста :)
| |
