Ошибка при создании головного элемента двусвязного списка

[Дамир]

Всем доброго времени суток!
Возникла проблема с созданием головного элемента списка

Type
Lists=Class
    Private
      F1,F2,F3:PDList;
    Public
      Constructor Create;
      Destructor Free;
      Procedure AddInList(Var F:PDList; Inform:Word);
      Procedure DeleteFromList(Var F:PDLIst; num:Word);
      Procedure AddInPosInList(Var F:PDList; Inform,Num:Word);
      Procedure ModifyInPos(F:PDLIst;inform,Num:Word);
      Procedure DesposeList(Var f:PDList);
      Procedure UpField(F:PDList;num:Word);
      Procedure DownField(F:PDList;num:Word);
      Procedure OverWriteKeys(f:PDlist);
      Procedure VievDList(F:PDList;Var StringGrid:TStringGrid);
    End;
Var List:Lists;

constructor Lists.Create;
begin
   New(F1);
   F1^.Next:=F1;
   F1^.Prev:=F1;
   F1^.Info:=0;
   F1^.Key:=0;
End;

Begin
  List.Create;
End;

При выполнении кода, указанного выше, возникает ошибка показанная на рисунке. Подскажите,по какой причине она может возникать?
Безымянный.JPG

[Дамир]

Я разобрался сам. Пост можно удалить.