Solved

How to...

Posted on 1999-01-22
5
145 Views
Last Modified: 2010-04-06
How to disconnect a Dial-up connection
using Delphi 3 procedure or s.th. else?
0
Comment
Question by:kaloyan
  • 4
5 Comments
 
LVL 17

Expert Comment

by:inthe
ID: 1362833
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

0
 

Author Comment

by:kaloyan
ID: 1362834
The connection is build by other programm...
0
 
LVL 17

Expert Comment

by:inthe
ID: 1362835
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 :-)

0
 
LVL 17

Accepted Solution

by:
inthe earned 30 total points
ID: 1362836
http://www.delphipages.com/
under comm/winsock section download Ras Header v2.11
install and add ras to your uses section on form  then the routine i posted earlier should do what your after
Regards Barry
0
 
LVL 17

Expert Comment

by:inthe
ID: 1362837
Hello i just tested it works perfect :-)

Happy Hanging up
Regards Barry
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Wininet read php file from internet issue 6 81
find a node in VST 2 63
drawing animated level bar based on numbers 3 88
How to load 2 images in same column in Delphi 2 32
The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
This Micro Tutorial demonstrates using Microsoft Excel pivot tables, how to reverse engineer competitors' marketing strategies through backlinks.
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…

911 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

17 Experts available now in Live!

Get 1:1 Help Now