W dniu 2014-11-06 o 16:15, Borneq pisze:
> Jak przepisać jeden wielokąt na inny zamieniając się duplikujące się

Zwykły uniq:
ListUniq:={}
for i:=0 to List.Count-1 do
if (i=0) or (List[i]<>prevElem) then
begin
prevS:=List[i];
ListUniq.Add(prevS);
end;

bardzo prosto z wykorzystaniem prevElem - poprzedniej wartości elementu
Jak jednak to zrobić na cyklach?
A może najpierw bez cykli, przejść całość a potem odrzucić końcowy gdy
taki sam jak początkowy?