Delphi 判断网络是否连通

本文整理自网络，侵删。

 uses WinInet;

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

end; 

相关阅读 >>

Delphi 文件转换base64

Delphi 关于位图的像素格式

Delphi xe5 重启 关闭 windows 8

Delphi字符串深入学习

Delphi 获取任意月份总共有多少天数

Delphi adoconnection1连接mssql数据库方法

Delphi 判断文本文件的编码格式

Delphi 的内存操作函数(5): 复制内存

Delphi程序在win7 win8 win10下自动请求以管理员身份运行

Delphi edit控制字居中，居左，居右

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

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