本文整理自网络,侵删。
uses WinInet;
procedure TForm1.Button1Click(Sender: TObject);
begin
if InternetGetConnectedState(nil, 0) then ShowMessage('已连接')
else
ShowMessage('已断开');
end;
相关阅读 >>
Delphi xe7里面 sharedactivitycontext怎么提示错误?
Delphi代码,直截注入别的进程,之后直截运行在别的进程中的代码
Delphi winapi: getwindowtextlength - 获取窗口标题长度
Delphi datetimetogmt gmt时间与tdatetime转换
更多相关阅读请进入《Delphi》频道 >>