多个客户端连接服务器端的问题！急

[freespace8]

分只有60分了，全给了

用了IdTCP和IdUDP 两种控件

程序是在局域网中运行的，当客户端启动时自动用udp群发自己所在的网段，当网段中的服务器接到消息时自动用用udp发送到客户端连接允许的信息，客户端收到后用tcp和服务器进行连接，服务器收到连接信息后，把客户端写入listview中，并用tcp发送消息给客户端，告诉客户端把信息给服务器端，客户端收到消息后发自己的机器信息发送给服务器，服务器收到后把信息写入对应的listview行中。

分别连接时程序无错误，但当有100多号客户端同时连接服务器端时，listview中加入数据混乱，甚至有些表项是空的，而且客户端远远小于100，大概只有30左右。

请问，如何解决此类问题。

[freespace8]

http://free.ys168.com/?freespace8

程序在这里的tcp测试里，哪位老大帮我看看啊

[happywww]

我猜是多线程存取冲突问题，需要时加Lock

[freespace8]

顶啊顶啊顶啊。没办法了，急死了

[j9dai]

关注 + 友情UP

[happywww]

Delphi VCL不是线程安全的，需要自己加锁，或者用Synchronize方法

[freespace8]

Synchronize 我知道啊，但是idtcpserver 线程是包起来的，我没办法加局部变量进去啊。急死了

[freespace8]

高手哥哥姐姐救命啊

[freespace8]

var
flag:bool;

while not flag do
begin
sleep(50);
end;
flag:=false;
这里加进对vcl的操作；
flag:=true;

我自己想了一个，不过不知道行不行啊，高手给看看。我明天才有机器测试。不晚了，睡了

[vinsonshen]

up

[solonet]

UP

[freespace8]

还是有些错误，继续顶啊。加入列表速度很慢。顶啊顶啊。

[freespace8]

不解决问题，坚决一直顶

[NewQger]

你最多连续顶3次，hoho，帮你一把

[freespace8]

来了就顶一下

[wealsh]

ding!!!