请高手指教TcpIP问题,给予高分!!!急!!多谢!! ( 积分: 188 )

  • 主题发起人 主题发起人 Delx
  • 开始时间 开始时间
D

Delx

Unregistered / Unconfirmed
GUEST, unregistred user!
我用的是delphi7,Internet面版下的TcpClient作客户端,TcpServer作服务器端,
在Client端连接Server端后,如何利用Client端接收Server端的data,如何配置Client端,
或是具体代码??
请高手执教!!!多谢
 
我用的是delphi7,Internet面版下的TcpClient作客户端,TcpServer作服务器端,
在Client端连接Server端后,如何利用Client端接收Server端的data,如何配置Client端,
或是具体代码??
请高手执教!!!多谢
 
控件的ip地址和端口好设置好就可以了,delphi7自带的demo里有源码,你看看就明白了
 
客户端用线程来读DATA

procedure TClientHandleThread.Execute;
var
ThtStr:String;
begin
while not Terminated do
begin
try
ThtStr:=TCPcommand1.ReadLn(EOL,500);//读服务端发来的数据
if ThtStr<>'' then
begin
commandstr:=ThtStr;
end;
except
Break;
end;
end;
end;
 
to ALL

我试过用Client端 OnReceive事件来读取从Server段的Data,但该事件不响应,不知为什么??
清高手指点!!!
 
to luckyso888

该线程是在那个事件下执行的?
我试过用Client端 OnReceive事件来读取从Server的Data,但该事件不响应,不知为什么??
 
呵呵,那个OnReceive事件必须要等到接收到你设置的那个数组那么多的字节之后才能响应的,当没有接收到那么多的字节的时候当然不响应。
 
你看看你设置的IP和端口号有没有问题
我试了,可以的OnReceive事件
 
后退
顶部