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

Вниз

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

 
Александр из Минска ©   (2003-10-23 20:11) [0]

Как разорвать соединение с интернетом или с другим компьютером? (разорвать удаленное соединение)


 
Александр из Минска ©   (2003-10-25 11:39) [1]

Даже никаких идей?


 
Rouse_ ©   (2003-10-25 12:20) [2]

RasGetConnectStatus + RasHangUp

Желаю успехов


 
Александр из Минска ©   (2003-10-25 16:27) [3]

Будем искать...


 
AlexV   (2003-10-27 12:07) [4]

Ну и как ?
Получилось разорвать соединение ?
Если да, то каким образом. Поделитесь пожалуйста.


 
Александр из Минска ©   (2003-10-27 16:15) [5]

скачай на torry файлик http://swiss.torry.net/vcl/comms/ras/d_ras.zip
Там исходник проги, работающей с соединениями. Там есть кнопка HangUp. Посмотри, что делается на ее нажатие. (А чтобы эти процедуры и т.д. можно было использовать без всяких проблем, скопь Ras.dcu в папку Delphi6/Lib (помоему туда))
Вот то, что делается при нажатии на кнопку
var
hRas: THRasConn;
begin
hRas := Longint(lvConnections.ItemFocused.Data);
if RasHangUp(hRas) = 0 then
begin
Sleep(1000); // wait 1 second
btnActiveConn.Click;
end
else
ShowMessage("RasHangUp failed.");
end;


 
Chlavik ©   (2003-10-27 17:13) [6]

Так а если в инет конектились через другую прогу то где hRas брать ? Через RasGetConnectStatus ?


 
Александр из Минска ©   (2003-10-27 22:52) [7]

Я тут просёк, что у меня эта штука Longint(lvConnections.ItemFocused.Data); равна -2098961908Выведите в ShowMessage ваши ... Напишите, пожалуйста, ваши цифры...



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

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

Наверх




Память: 0.48 MB
Время: 0.018 c
3-75111
tchn
2003-11-28 14:39
2003.12.23
SQLDirect, MSSQL, (10029)Maximum number of DBPROCESSes already al


1-75200
k_len
2003-12-11 07:53
2003.12.23
MaskEdit


1-75203
intell
2003-12-10 17:57
2003.12.23
Как быстро удалить каталог?


4-75462
Avgurin
2003-10-29 09:23
2003.12.23
Перехват выхода из Windows


14-75350
cyborg
2003-11-29 13:15
2003.12.23
Дурацкие выражения