https://blog.csdn.net/chelen_jak/article/details/50204145
Delphi quickly detect whether networking
Transfer:
http://www.delphitop.com/html/wangluo/2990.html
use the WinInet;
whether the correct line detection method //
IF The InternetGetConnectedState (nil, 0) the then
the begin
Self.Caption: = 'line';
End
the else
the begin
Self.Caption: = 'off';
End;
whether tested, and QQ line detection is substantially the same.
use the WinInet;
whether the correct line detection method //
IF The InternetGetConnectedState (nil, 0) the then
the begin
Self.Caption: = 'line';
End
the else
the begin
Self.Caption: = 'off';
End;
whether tested, and QQ line detection is substantially the same.