Главная страница
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.231 c
3-75111
tchn
2003-11-28 14:39
2003.12.23
SQLDirect, MSSQL, (10029)Maximum number of DBPROCESSes already al


1-75244
SASH2
2003-12-09 07:31
2003.12.23
Архивные файлы


14-75320
Lony
2003-11-30 17:54
2003.12.23
Помогите воскресить жёсткий диск!


7-75415
Ivolg
2003-10-17 11:50
2003.12.23
Запуск на старте Windows


14-75329
Мазут Береговой
2003-12-02 04:18
2003.12.23
Эта ветка чи-иста-а для любознательных па-ацанов!...