Initialization-Section: Initialisieren von Variablen

[barnti]

Hallo,

folgender Codeauszug:

Delphi-Quellcode:

unit Main;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,PDInterface;

type
  TForm1 = class(TForm)
  private
    FPDInterface: TPDInterface;
    function GetPDInterface: TPDInterface;
    procedure SetPDInterface(const Value: TPDInterface);
    { Private declarations }
  public
    Property PDInterface: TPDInterface read GetPDInterface write SetPDInterface;
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

{ TForm1 }

function TForm1.GetPDInterface: TPDInterface;
begin
  Result:= FPDInterface;
end;

procedure TForm1.SetPDInterface(const Value: TPDInterface);
begin
  FPDInterface:= Value;
end;

Initialization
  FPDInterface:= TPDInterface.Create
end;

end.

Ich möchte im Initialisationsabschnitt die Variable 'FPDInterface' initialisieren. Leider bekomme ich die Fehlermeldung:
Undefinierter Bezeichner.
Weiß jemand Rat?