请教DELPHI高手,有关于TServerSocket,TClientSocket的问题! ( 积分: 20 )

  • 主题发起人 主题发起人 tigeryt
  • 开始时间 开始时间
T

tigeryt

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟我想做一个远程通迅的程序,我想在客户端与服务器端成功建立连接后在客户端弹出一个对话框提示用户‘连接成功!!!’小弟是初学者请各位高手多指点!
 
小弟我想做一个远程通迅的程序,我想在客户端与服务器端成功建立连接后在客户端弹出一个对话框提示用户‘连接成功!!!’小弟是初学者请各位高手多指点!
 
哪边弹啊,客户端?,你用什么控件的啊?
 
ClientType要=ctNonBlocking
TClientSocket的OnConnect事件中, ShowMessage('连接成功')...

ClientType=ctBlocking的话,就是多线程显示对话框的讨论范围了,比较麻烦...但这种情况比较少,除非你一定要用多线程(同步Socket)才能实现, 异步Socket能适应绝大部工作, 两种方式只是开发模式的不同而已.
 
那如果连接失败呢,请问中在哪个事件中写程序?让其显示showmessage(‘连接失败’)
 
看看事件就知道了.
如果连接失败, 会在OnError事件中有体现.
这个事件中,有个ErrorCode比较古怪, 在里面不设置它, 程序会抛出异常--当然,这个异常你可以在应用程序的默认异常处理句柄中处理, 但通常是根据这个值,作相关处理后,把它置为0
OnError事件, 在连接时, 发送数据时, 或者对方异常关闭Socket时,都会发生, 会在其它参数中有体现.
OnDisconn事件,则在对方正常关闭连接,或我方主动关闭连接时发生比如:ClientSocket.Socket.Close...
 
你好,虽然你说得很详细,但我还是不太清楚,所以不得不再次打扰你,忘见谅!
其实我的要求很简单!我在客户端有个‘连接’按纽,我想在点击‘连接’按钮时如果连接失败,则showmeessage('连接失败!!!'),但我在OnError事件是写showmeessage('连接失败!!!'),运行程序时(服务器端关闭),弹出连接失败对话框,当我关闭该对话框后又弹出一个对话框提示以下错误“Asynchronous Socket error 10061”,我不想有后面的提示错误信息,请问怎么样才可以去除这个信息,最好有代码,因为我对异常处理不熟!再次感谢!!!
 
在OnError事件是写一个
errorcode=0
 
这个应该很简单,客户端发送的时候设为有返回值NeedBack;
如果客户端接收到服务器端的返回值的时候,说明已经发送成功了,弹出提示对话框就可以了;
 
多人接受答案了。
 
后退
顶部