Label zur Laufzeiter erstellen-nicht angezeigt auf Groupbox

[Susanne]

Ich hab es nun so versucht - funktioniert aber auch nicht

Delphi-Quellcode:

  SetLength(a_Lbl,i_LblCnt);
  for i := low(a_Lbl) to high(a_Lbl) do
    begin
      for iii := low(a_Gbx) to high(a_Gbx) do begin
        i_GbX := a_Gbx[iii].Left;
        i_GbY := a_Gbx[iii].Top;
        i_GbH := a_Gbx[iii].height + i_GbY;
        i_GbB := a_Gbx[iii].width + i_GbX;

        left:= IniFile.ReadInteger(sl_Lbl[i],'x',8);
        top:= IniFile.ReadInteger(sl_Lbl[i],'y',8);

        if (Left >= i_GbX) and (Left<= i_GbB) and (Top >= i_GbY) and (Top<= i_GbH) then begin
          a_Lbl[i] := TLabel.Create(a_Gbx [iii]);
          a_Lbl[i].Font.Size:= 10;
          a_Lbl[i].Left   := Left 
          a_Lbl[i].Top    := Top ;
          a_Lbl[i].BringToFront;
          break;
        end else begin
          a_Lbl[i] := TLabel.Create(Form2);
          a_Lbl[i].Font.Size:= 10;
        end;
      end;

      a_Lbl[i].Left     := IniFile.ReadInteger(sl_Lbl[i],'x',8);
      a_Lbl[i].Top      := IniFile.ReadInteger(sl_Lbl[i],'y',8);
      a_Lbl[i].Width    := IniFile.ReadInteger(sl_Lbl[i],'cx',8);
      a_Lbl[i].Height   := IniFile.ReadInteger(sl_Lbl[i],'cy',8);
    end;

    end;