在连接上Internet后,MSN会自动测定这个事件,并自动登录。请问其工作原理是什么?是不是其截获了哪个windows的消息后做出的反应?

解决方案 »

  1.   

    判断网络状况
    添加wininet单元。
    procedure TForm1.Button1Click(Sender: TObject);
    var
      Types:integer;
    begin
      Types:=INTERNET_CONNECTION_MODEM+INTERNET_CONNECTION_LAN+INTERNET_CONNECTION_PROXY;
      if internetGetConnectedState(@types,0) then
         edit1.text:='on line'
      else
         edit1.text:='off line';
    end;
      

  2.   

    用个timer来定期检测执行上面的语句就可以了