怎样能屏蔽掉SOCKET连接失败后出现的对话框，而使用户端窗体上的LABEL显示离线？

Question

如加以下代码：
try
    DataModule2.SocketConnection1.Connected:=True;
    DataModule2.ClientDataSet1.Active:=True;
    label1.Caption:='在线';
  except
    label1.Caption:='离线';
  end;

Answer 1

try
   DataModule2.SocketConnection1.Connected:=false; 
   DataModule2.SocketConnection1.Connected:=True;
   DataModule2.ClientDataSet1.Active:=false; 
   DataModule2.ClientDataSet1.Active:=True;
    label1.Caption:='在线';
  except
    label1.Caption:='离线';
  end;//************************
//*天行健，男人以自强不息*
//************************

Answer 2

老兄，你是不是自动创建 数据模块了？自动创建就屏蔽不了，呵呵你试一下  dmClient:=TdmClient.create(application);
而且在用try
   DataModule2.SocketConnection1.Connected:=false; 
   DataModule2.SocketConnection1.Connected:=True;
   DataModule2.ClientDataSet1.Active:=false; 
   DataModule2.ClientDataSet1.Active:=True;
    label1.Caption:='在线';
  except
    label1.Caption:='离线';
  end;之前，所有的.connected ,.active一定要为false;Good　Ｌｕｃｋ
 //************************
//*天行健，男人以自强不息*
//************************