主页 > 编程资料 > Delphi >
发布时间:2015-09-22 作者:网络 阅读:68次

use WinInet;
 
  //正确检测是否在线方法
  if InternetGetConnectedState(nil, 0) then
  begin
    Self.Caption := '在线';
  end
  else
  begin
    Self.Caption := '脱机';
  end;
经测试,和QQ检测是否在线基本相同。

关键字词: