T
tianzhen
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.ThreadDone(Sender: TObject);
begin
...
threadcount:=threadcount+1;//是否需要进临界区?
...
listbox1.items.delete(i);
//是否需要进临界区?
...
end;
begin
...
threadcount:=threadcount+1;//是否需要进临界区?
...
listbox1.items.delete(i);
//是否需要进临界区?
...
end;