Реализация структуры Вирта на Delphi

[WarHamster]

За основу взял коды для консоли Си, коды рабочие, переписал под Delphi, граф там описывается как класс. Компилируется нормально, но при запуске вылетает на первой же строчке констуктора

Constructor Graph.Create;
begin
new(Head);
Tail:=Head;
end;

Помогите пожалуйста найти проблему. PaintBox1Paint на всякий случай закомментил, т.к. писал "вслепую", без возможности запустить.

Граф.rar

[ega2701]

А ты нашел в чем ошибка была?