请看下面的代码:procedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread);
const
TempImageFile='c:\test.bmp';
//设置的临时图像文件
var
t:TMemoryStream;
begin
t:=TMemoryStream.Create;
AThread.Connection.ReadStream(t,-1,True); //从连接中取得流式数据
t.SaveToFile(TempImageFile);
Image2.Picture.LoadFromFile(TempImageFile);
t.Free ;
end;其中的AThread我不认识,可查DELPHI的帮助查不到,到书店里查书也查不到,请大家给我讲讲,或指明在DELPHI帮助里的位置。我用索引里搜不到。
const
TempImageFile='c:\test.bmp';
//设置的临时图像文件
var
t:TMemoryStream;
begin
t:=TMemoryStream.Create;
AThread.Connection.ReadStream(t,-1,True); //从连接中取得流式数据
t.SaveToFile(TempImageFile);
Image2.Picture.LoadFromFile(TempImageFile);
t.Free ;
end;其中的AThread我不认识,可查DELPHI的帮助查不到,到书店里查书也查不到,请大家给我讲讲,或指明在DELPHI帮助里的位置。我用索引里搜不到。
解决方案 »
- 年过半,散分
- 刚完成的表格控件,请大家帮忙测试下....
- Delphi中确实没有“无符号64位整型”的数据类型吗
- inherited 为什么可以调用父类的private函数?
- 用NMUDP控件的NMUDP.sendstream传输时,如何解决奇数个byte型变量填充!!急急急!
- AdvStringGrid中的选择行简单问题,急!!在线等
- 如何把Query,Table,Adoconnection的密码提示去掉
- 不难的数学问题,请拉兄弟一把
- Bufeng收藏——Delphi 编程技巧 之二 【代发】
- DELPHI开发工程师
- 小弟初学Delphi请各位推荐一下,Delphi的入门书!
- 怎么做到软件的自我MD5验证来防止修改?
TIdPeerThread
Thread used for client connections.TIdPeerThread = class(TIdThread)DescriptionTIdPeerThread is a thread that is created for every connection made to the TIdTCPServer. Every client connection runs in it's own thread on the TIdTCPServer.Requests for TIdPeerThreads are created by a TIdListenerThread, and are delegated to the TIdThreadMgr for the TCP server.