我现在只能用一个Timer不断Readln,这好像不太好啊听见网上有人说什么多线程,堵塞,到底该怎么操作呢???听说好像有这个Demo啊,谁能给下下载地址,Indy8/9/10都可以啊或者给下具体的代码??我剩下的80分都给各位了,到底怎么办呢?
解决方案 »
- Image自己做了一条平滑曲线,如何获得这个曲线的最高点的X,Y值(在线等)
- 爆强 delphi 愛好者 [b]c/s或三层 开发模式[/b]
- 控件求助中!
- 请教安装package时错误!!!!
- FastReport图片显示的问题
- 向大家推薦一個電腦圖書站點,有大量的Delphi圖書
- 关于TextOut,如何在其他程序的窗口中输出文字?
- 请问如何判断image1中的图片是BMP,还是JPG?
- 如何实现数据的自动刷新?
- 我的程序提示缺少stock.dcu文件,可是这个文件存在呀,这是怎么回事,请高手帮忙。
- 求将EXCEL导进到access中和将access导出到EXCEL的源码?问题搞了几天没搞出来!!1
- Id很多控件到底是干什么用的
http://www.nevrona.com/indy
或者搜索一下,多得很
procedure TRecThread.Execute;
var
ires,i,j : integer;
recMsg : TMyMsg;
sNode,ss : TTreeNode;
begin
{ Place thread code here }
FreeOnTerminate := True; while ((not Terminated) and DM.tcpLog.Connected) do
begin
ires := DM.tcpLog.ReadFromStack;
if ires > 0 then
begin
DM.tcpLog.ReadBuffer(recMsg,sizeof(recMsg));
case recMsg.iType of