Einzelnen Beitrag anzeigen

sb67pro
(Gast)

n/a Beiträge
 
#1

Frame mehrfach dynamisch erzeugen

  Alt 11. Okt 2009, 20:23
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]
  Mit Zitat antworten Zitat