Szybkie notatki administratora

Programowanie

Kasowanie listy

while List.Count > 0 do begin TObject(List[List.Count-1]).Free(); List.Delete(List.Count-1); end;

,