DELPHI的Indy IdTCPClient控件如何主动接收数据

wx810 2012-11-23 05:05:40
如题
idtcpserver能发送数据,但不知道idtcpclient如果主动去取。目前是用idtcpclient再发一条信息发完后马上去读,可以读到由idtcpserver写进的数据。
...全文
1846 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
wx810 2012-11-23
  • 打赏
  • 举报
回复
谢谢楼上的给我启发,好象可以了,分就给你吧。我使用readln,然后判断是否为空
SQLDebug_Fan 2012-11-23
  • 打赏
  • 举报
回复
如果没有返回需要加超时,或者服务器返回错误码。
wx810 2012-11-23
  • 打赏
  • 举报
回复
这是我线程类中的代码: unit ClientHandleThread; interface uses Classes,SysUtils; type TClientHandleThread = class(TThread) private { Private declarations } servercmd:integer; serverMsg:string; procedure HandleInput; protected procedure Execute; override; end; implementation uses Unit1; { Important: Methods and properties of objects in visual components can only be used in a method called using Synchronize, for example, Synchronize(UpdateCaption); and UpdateCaption could look like, procedure TClientHandleThread.UpdateCaption; begin Form1.Caption := 'Updated in a thread'; end; } { TClientHandleThread } procedure TClientHandleThread.Execute; begin while not Terminated do begin if not Form1.IdTCPClient1.Connected then Terminate else try servercmd:=Form1.IdTCPClient1.IOHandler.ReadInteger; Synchronize(HandleInput); except end; end; end; procedure TClientHandleThread.HandleInput; begin case servercmd of 0: else end; end; end. case部分怎么判断有没有返回
SQLDebug_Fan 2012-11-23
  • 打赏
  • 举报
回复
TIdTcpClient是阻塞式调用,用一个线程调用Read方法,有返回就读到数据了。
使用TIdAntiFreeze对抗“冻结”   Indy使用一个特殊的组件TIdAntiFreeze来透明地解决客户程序用户界面“冻结”的问题。TIdAntiFreeze在Indy内部定时中断对栈的调用,并在中断期间调用Application.ProcessMessages方法处理消息,而外部的Indy调用继续保存阻塞状态,就好像TIdAntiFreeze对象不存在一样。你只要在程序中的任意地方添加一个TIdAntiFreeze对象,就能在客户程序中利用到阻塞式Socket的所有优点而避开它的一些显著缺点。   Indy使用了线程技术   阻塞式Socekt通常都采用线程技术,Indy也是如此。从最底层开始,Indy的设计都是线程化的。因此用Indy创建服务器和客户程序跟在Unix下十分相似,并且Delphi的快速开发环境和Indy对WinSock的良好封装使得应用程序创建更加容易。   Indy服务器模型   一个典型的Unix服务器有一个或多个监听进程,它们不停地监听进入的客户连接请求。对于每一个需要服务的客户,都fork一个新进程来处理该客户的所有事务。这样一个进程只处理一个客户连接,编程就变得十分容易。   Indy服务器工作原理同Unix服务器十分类似,只是Windows不像Unix那样支持fork,而是支持线程,因此Indy服务器为每一个客户连接分配一个线程。   图1显示了Indy服务器的工作原理。Indy服务器组件创建一个同应用程序主线程分离的监听线程来监听客户连接请求,对于接受的每一个客户,都创建一个新的线程来为该客户提供服务,所有与这一客户相关的事务都由该线程来处理。   使用组件TIdThreadMgrPool,Indy还支持线程池。   线程与Indy客户程序   Indy客户端组件并未使用线程。但是在一些高级的客户程序中,程序员可以在自定义的线程中使用Indy客户端组件,以使用户界面更加友好。

5,928

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧