Dynamische Frames - Probleme

[junale]

So nun habe ich noch weitere Versuche gemacht - Ich habe zum Spass eine Function definiert:

Delphi-Quellcode:

  TAboutFrame = class(TFrame)
    procedure PlugInInformation (Sender: TObject; var Info: TAEJPlugInInformation);
    procedure InitPlugIn (Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;
[...]
procedure TAboutFrame.PlugInInformation (Sender: TObject; var Info: TAEJPlugInInformation);
begin
  Info.PIType := pitSingleTool;
  Info.PIName := 'About Frame';
end;

Das klappt nun gar nicht -->

Delphi-Quellcode:

    if (aPlugInClass <> nil) then begin
      // PlugIn Informationen lesen
      aPlugInFrame := TComponentClass(aPlugInClass).create (Application) as TFrame;
      aPlugInGetInfo := aPlugInFrame.MethodAddress ('PlugInInformation');
      if Assigned (aPlugInGetInfo) then
        aPlugInGetInfo (self, aPlugInInformation)
      else begin
        aPlugInInformation.PIType := pitSingleTool;
        aPlugInInformation.PIName := lstPlugIns.Strings[iPlugInDex];
      end;
      aPlugInSheet.Caption := aPlugInInformation.PIName;
    end;

da bekomme ich immer einen Fehler...