if ((client.Name=client1.Name) and (not (client.Socket=client1.Socket))) then begin if sockettemp=-1 then begin sockettemp:=TSimpleClient(Items[i]).Socket; //clc-11-24 end; Remove(client1); end;能够执行到Remove,应该是有此索引的数据吧.....
if ((client.Name=client1.Name) and (not (client.Socket=client1.Socket))) then begin if sockettemp=-1 then begin sockettemp:=TSimpleClient(Items[i]).Socket; //clc-11-24 end; Remove(client1); end;能够执行到Remove,应该是有此索引的数据吧.....
begin
if sockettemp=-1 then
begin
sockettemp:=TSimpleClient(Items[i]).Socket; //clc-11-24
end;
Remove(client1);
end;能够执行到Remove,应该是有此索引的数据吧.....
if ((client.Name=client1.Name) and (not (client.Socket=client1.Socket))) then
begin
if sockettemp=-1 then
begin
sockettemp:=TSimpleClient(Items[i]).Socket; //clc-11-24
end;
Remove(client1);
end;能够执行到Remove,应该是有此索引的数据吧.....