<div>
hi,<br />
are you using f.piette's components or something else?<br />
there is a api<br />
&nbsp;RASHANGUP(1);<br />
you could try ,but better to say which components you are using to connect<br />
Regards Barry<br />
<br />

</div>


hi,
are you using f.piette's components or something else?
there is a api
 RASHANGUP(1);
you could try ,but better to say which components you are using to connect
Regards Barry



<div>
The connection is build by other programm...<br />

</div>


The connection is build by other programm...


<div>
you'll probably have to use RasEnumConnections to find the RAS connection handle that you want to hang up, and then call RasHangUp with that handle<br />
&nbsp;Regards Barry<br />
<br />
ps i found an example for you with a component called TRasConn<br />
<br />
Procedure HangupRAS;<br />
var<br />
&nbsp; RasConn &nbsp;: TRasConn;<br />
&nbsp; bsize &nbsp; &nbsp;: DWORD;<br />
&nbsp; Count &nbsp; &nbsp;: &nbsp;DWORD;<br />
<br />
begin<br />
&nbsp; RasConn.dwSize := SizeOf(TRasConn);<br />
&nbsp; bsize := SizeOf(RASConn);<br />
&nbsp; if RASEnumConnections(@RASCon<wbr />n, bsize, Count) = 0 then<br />
&nbsp; &nbsp; &nbsp;if Count &gt;&nbsp;0 then RASHangUp(RASConn.hRasConn<wbr />);<br />
end;<br />
<br />
i will have a look were trasconn is then get back :-)<br />
<br />

</div>


you'll probably have to use RasEnumConnections to find the RAS connection handle that you want to hang up, and then call RasHangUp with that handle
 Regards Barry

ps i found an example for you with a component called TRasConn

Procedure HangupRAS;
var
  RasConn  : TRasConn;
  bsize    : DWORD;
  Count    :  DWORD;

begin
  RasConn.dwSize := SizeOf(TRasConn);
  bsize := SizeOf(RASConn);
  if RASEnumConnections(@RASConn, bsize, Count) = 0 then
     if Count > 0 then RASHangUp(RASConn.hRasConn);
end;

i will have a look were trasconn is then get back :-)



<div>
Hello i just tested it works perfect :-)<br />
<br />
Happy Hanging up<br />
Regards Barry<br />

</div>


Hello i just tested it works perfect :-)

Happy Hanging up
Regards Barry


<div>
<div class="content wysiwyg-content">
How to disconnect a Dial-up connection<br />
using Delphi 3 procedure or s.th. else?
</div>
</div>


How to disconnect a Dial-up connection
using Delphi 3 procedure or s.th. else?

How to...

Delphi is the most powerful Object Pascal IDE and component library for cross-platform Native App Development with flexible Cloud services and broad IoT connectivity. It provides powerful VCL controls for Windows 10 and enables FMX development for Windows, Mac and Mobile. Delphi is your choice for ultrafast Enterprise Strong Development™. Look for increased memory for large projects, extended multi-monitor support, improved Object Inspector and much more. Delphi is 5x faster for development and deployment across multiple desktop, mobile, cloud and database platforms including 32-bit and 64-bit Windows 10.