Problema cu TidPeerThread si nishte pointeri.....

Am o mica problema:=======================================================for i:=0 to clients.Count-1 do begin RecClient:=clients[i]; if Athread=RecClient.thread then begin Clients.Delete(i); end; end;==========================================unde: type Tclient = record username,dns:string[20]; thread:TidPeerThread;end;clients:Tlist;RecClient:^Tclient;Problema mea este ca nu pot elimina pointerul, dupa cum se vede in incercarea mea.Relatia "Athread=RecClient.thread" nu merge, poate sunt alte variante ?Daca poate cineva sa ma ajute, ii multumesc de pe acum :).