Много ошибок. Конструктор Create нужно вызывать для каждого обьекта, с которым будешь работать, тоесть, если они у тебя в динамическом массиве, то типа так:
Код:
setlength(uchastok, 3); //размер массива становится 3, от 0 до 2
for i:=0 to 2 do
uchastok[i]:=TUchastok.Create; //для классов конструктор нужно вызывать так.
и вот здесь работаем с объектами.... не забывая, что в динамическом массиве индекс начинается с 0 и оканчивается {длина массива-1}