Frame mehrfach dynamisch erzeugen

[sb67pro]

Ich habe folgendes Problem:

Ich möchte ein Frame dynamisch zur Laufzeit mehr fach auf meinem Formular platzieren. Der Code sieht in etwa so aus:

Delphi-Quellcode:

  for i := 0 to xCount - 1 do begin
    if i > 0 then begin
      mysplitter := TRXSplitter.Create(self);
      mysplitter.Parent := self;
      mysplitter.Align := alTop;
      xSplitter.Add(mySplitter);
    end;
    myFrame := TFRameDataGridOne.Create(self);       // Hier gibts Ärger :-)
    myFrame.Parent := self;
    myFrame.Visible := true;
    myFrame.Width  := self.Width;     //3 = height der Splitter
    myFrame.Height := (self.Height - (xCount-1) * 3) div xCount;
    myFrame.Align  := alTop;
    myFrame.DBGrid1.DataSource := myReportDetail.Query.MyDataSource;
    xFrames.Add(myframe);
  end;

Der erste Schleifen durchlauf klappt prima. Im zweiten wir der Splitter erzeugt aber dann an der Create-Aneisung kommt
Komponente FrameDataGridOne existiert bereits.

Wenn ich das Frame zur designzeit 3 mal reinlege gehts aber...

Wer weiss einen Trick?

[edit=SirThornberry]Delphi-Tags gesetzt - nächstes mal bitte selbst machen Mfg, SirThornberry[/edit]