Fehler beim dynamischen Erstellen von Tabs

[.chicken]

Ich krich hier immer n Fehler aber weiss nicht wo er liegt...habe es ziemlich genauso in einer alten Prozedur gemacht, wo alles funktioniert hat!

Delphi-Quellcode:

procedure TMessageForm.CreateTab(Name, Caption: String);
var
  i: Integer;
  ATab: TTabSheet;
  AFrame: TMsgFrame;
begin
  if not Assigned(PControl.FindComponent(Name)) then
  begin
    ATab := TTabSheet.Create(MessageForm);
    ATab.Caption := Caption;
    AFrame := TMsgFrame.Create(MessageForm);
    AFrame.Name := Name;               //von hier
    ATab.InsertControl(AFrame);        //nach hier kommt der Fehler ;-)
    ATab.PageControl := PControl; //PControl ist mein PageControl
  end
  else
    (PControl.FindComponent(Name) as TTabSheet).Highlighted := True;
end;

Wisst ihr wo da der Fehler liegt? Bin ich einfach wieder blind?