Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Kako detektovati Internet konekciju

[es] :: Pascal / Delphi / Kylix :: Kako detektovati Internet konekciju

[ Pregleda: 3348 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

FireProxy
Beograd

Član broj: 19043
Poruke: 77
*.yubc.net



Profil

icon Kako detektovati Internet konekciju12.02.2004. u 15:00 - pre 214 meseci
Kako aplikacija, koju sam napravio, da bude u mogućnosti da detektuje aktivnu Internet konekciju? Napominjem da sam u ovom poslu samouk i nov, te molim sve zainteresovane za razumevanje pri davanju odgovora...
When the program is being tested, it is too late to make design changes.
 
Odgovor na temu

Chawa
Dejan Dimitrijevic
programer
Ljubljana

Član broj: 7764
Poruke: 26
*.dialup.neobee.net.



Profil

icon Re: Kako detektovati Internet konekciju13.02.2004. u 06:01 - pre 214 meseci
Evo ovako (provera da li je postoji konekcija i automatsko zvanje), na primer

uses ... ,WinInet, ...


var
dwConnectionTypes: DWORD;

dwConnectionTypes := INTERNET_CONNECTION_MODEM + INTERNET_CONNECTION_LAN + INTERNET_CONNECTION_PROXY;
if not InternetGetConnectedState(@dwConnectionTypes, 0) then begin
// not connected
if MessageDlg('Do you want to connect to internet now?',mtWarning,[mbYes,mbNo],0)=mrYes then begin
if not InternetAutodial(INTERNET_AUTODIAL_FORCE_ONLINE or INTERNET_AUTODIAL_FORCE_UNATTENDED, 0) then begin
ShowMessage('Error: Auto dial failed!');
end
else
// autoconnect to internet
end;
end
 
Odgovor na temu

reiser

Član broj: 7895
Poruke: 2314



+102 Profil

icon Re: Kako detektovati Internet konekciju14.02.2004. u 00:42 - pre 214 meseci
Imam gotovu funkciju koju sam negde isceprkao po net-u, vrlo prosta, 2-3 reda.
Samo, ne mogu sad da je postujem, sutra cu...
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Kako detektovati Internet konekciju

[ Pregleda: 3348 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.