for 循环数值过大,会引起异常。
- Delphi(Pascal) code
begin adata.ReadBuffer(TempPSession,SizeOf(TSession)); for i:=0 to 1000 do //如果大于3000多,就会自动跳出循环了 begin if (PSessionarray[i].PeerIP=TempPSession.PeerIP)and(PSessionarray[i].peerPort =TempPSession.peerPort) then begin Exit; end; end;
好奇怪的问题,同样的代码,在其他程序一点问题都没有
[解决办法]
不是循环问题
是你的代码问题
PSeeionarray[i].PeerIP
PSeeionarray
这个数组出的问题
[解决办法]
楼上说的对,for个几亿应该都没问题
应该是PSessionarray[i].peerPort或者PSessionarray[i].PeerIP的事情