如何知道机器和因特网连接了

Question

网提供代码!

Answer 1

telnet 通了就 ok 了

Answer 2

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ComCtrls, StdCtrls, HTTPGet, OBRARCompress, wininet;procedure TForm1.FormShow(Sender: TObject);
begin
  if InternetCheckConnection('http://www.sohu.com/', 1, 0) then
  begin
  end
  else
  begin
    showmessage('没有网络连接，请拨号登陆internet');
  end;
end;以前写的智能在线升级

Answer 3

to ghyghost(爱国人士) 
  问题已经解决
by the way
  智能在线升级怎么实现，我现在做的这个东东牵涉到这一块，多谢了!
能提供实现吗？非常感谢[email protected]