Цитата:
|
Сообщение от DungeonLords
Сделаем так(может не работать)
Код:
VAR con_str:PChar;
begin
con_str:=PChar({Имя соединения}+'/DISCONNECT');
ShellExecute(Self.Handle,'open','rasdial.exe', con_str,'C:',SW_ShowMinNoActive);
end; |
А если имя подключения не известно?