问一个关于win sock 的问题~各位大侠给给答复~

Question

关于 TServerSocket(1),TClientSocket(2)的.
建立连接后,1的connect事件发生.1的accept 事件发生,再是2的connect发生?|
是不是这样的?
或者能不能给出个事件响应的先后顺序,
包括 1,2的connect.accept(1).read. ........
谢谢了~

Answer 1

呵。。这东西花上几分钟写写程序就非常清楚了，为什么舍近求远呢？
比如在FORM放上TSERVERSOCKET，TCLIENTSOCKET，一个TMEMO，定义一个方法
procedure TForm1.DisplayMsg(s:string);
begin
  s:=IntToStr(GetTickCount)+':'+s;
  memo1.lines.add(s);
  sleep(50);//加它为了让各事件看得出先后顺序。。
end;
每个事件触发时候就调用一下它。
TClientSocket连接同一程序的TServerSocket.