怎样判断网络是否已掉线？

Question

请问：
用tidhttp获取网页的时候，怎样判断网络是否仍然在连接状态，而不是别的错误发生导致获取网页的停止

Answer 1

一个方法是打开keepalive机制，把测试时间设置短一点就可以及时检测TCP/IP连接是否中断。

Answer 2

请记得uses  wininet以下是一个判断当前计算机是否联网的例子：procedure TForm1.Button1Click(Sender: TObject);
begin
    if InternetCheckConnection('http://www.yahoo.com/', 1, 0) then
        edit1.text:= 'Connected'
    else
        edit1.text:= 'Disconnected';
end;