本文整理自网络,侵删。
uses WinInet;
procedure TForm1.Button1Click(Sender: TObject);
begin
if InternetGetConnectedState(nil, 0) then ShowMessage('已连接')
else
ShowMessage('已断开');
end;
相关阅读 >>
Delphi 2009 indy10 idhttp get 中文出现乱码的问题
Delphi idhttp 设置cookie 和访问后读取cookie 值
更多相关阅读请进入《Delphi》频道 >>