Hi!
Ihr müsst die
Unit WinInet einbinden und dann verfahrt ihr so weiter:
InternetAutodial(internet_autodial_force_unattended, handle);
Man kann auch noch andere Parameter benutzen. Hier die Übersicht:
internet_autodial_force_unattended: Geht mit der aktuellen Verbindung online, ohne nochmals nachzufragen.
internet_autodial_force_online: Geht einfach online, nicht aber, wenn "manuelle Verbindung" angewählt ist. Dann ist noch ein Bestätigen nötig.
internet_autodial_failifsecuritycheck: Keine Verbindung, wenn unter Win95/98 die Drucker- oder Dateifreigabe gewählt ist.
Trennen geht dann so:
InternetAutodialHangup(0);
Und so prüft man, ob eine Vebindung besteht:
Delphi-Quellcode:
function IsOnline: boolean;
begin
result:=InternetGetConnectedState(nil, 0);
end;
Hoffe, ich konnte alle Fragen beantworten...
Grüße,
Dj_Base