Delphi 判断网络是否连通

本文整理自网络，侵删。

 uses WinInet;

procedure TForm1.Button1Click(Sender: TObject);
begin
if InternetGetConnectedState(nil, 0) then ShowMessage('已连接')
else
ShowMessage('已断开');

end; 

相关阅读 >>

Delphi xe7开发的获取网页中字符串的编码是否是utf8

Delphi fmx检测屏幕旋转

Delphi xe5 android 获取网络状态

Delphi 中 inputquery 实现密码输入

如何使用Delphi 10 seattle的android应用做intent的发送和接收

Delphi windows 编程[18] - 更换菜单项: modifymenu

Delphi截取技巧 lastdelimiter

xe7提示找不到sharedactivitycontext函数

Delphi stringgrid 实例5 本例功能:字体修改为居中，红色，20号

Delphi 双击关闭pagecontrol中的一个分页

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 判断网络是否连通