网络不通时,数据库连接问题 当访问后台数据库(另一台计算机)时,如果此时网不通,则要等好长时间然后报错怎样才能马上判断到连接数据库失败,然后做其他操作,不报错。我用的是bde和sql server 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 如果你用ADOConnection,有个ConnectionTimeOut属性,可以设置时间 我用的是database有属性设置吗 procedure TForm1.wlbs;beginClientSocket.Active:=False;ClientSocket.Address:=ip;ClientSocket.Port:=pot;//ClientSocket.Socket.Data:=Pointer(pot); //待会根据这个判断哪个端口连上了ClientSocket.Active:=TRUE;end;procedure TForm1.ClientSocketConnect(Sender: TObject; Socket: TCustomWinSocket);beginistong:=true;end;procedure TForm1.ClientSocketError(Sender: TObject; Socket: TCustomWinSocket; ErrorEvent: TErrorEvent; var ErrorCode: Integer);beginistong:=false;ErrorCode := 0;end; 如何实现TWebBrowser与外壳程序的交互 【散分贴】大吼一声: 老张有儿子啦! 蔡鸟的问题目 建立数据库 高手来帮忙啊,怎么能实现呼出窗口的功能? 谁有做vcl方面的资料!227分相送 我管理不了我自己的贴子 想把字符串里的数据存到数组里(数据是BYTE类型的) 打搅一下,类和Record有没有什么微妙的区别? 一个PASCAL小程序,望各位大虾帮忙看看 在Delphi环境中开发的corba程序能在linx/unix环境下运行吗 请告诉我即时刷新DBGrid的方法?
begin
ClientSocket.Active:=False;
ClientSocket.Address:=ip;
ClientSocket.Port:=pot;
//ClientSocket.Socket.Data:=Pointer(pot); //待会根据这个判断哪个端口连上了
ClientSocket.Active:=TRUE;
end;procedure TForm1.ClientSocketConnect(Sender: TObject;
Socket: TCustomWinSocket);
begin
istong:=true;
end;procedure TForm1.ClientSocketError(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
istong:=false;
ErrorCode := 0;
end;