Einzelnen Beitrag anzeigen

Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.143 Beiträge
 
Delphi 10.3 Rio
 
#15

Re: Auf Dynamisch erstellte Labels zugreifen

  Alt 20. Okt 2006, 11:32
Zitat von 150gozilla:
Wie könnte ich die Schleifen am besten verschachteln ?
Delphi-Quellcode:
 SetLength(Labels,81);
 index2 := 0;

  for i:=1 to 9 do
  begin
   for j:= 1 to 9 do
   begin
     Labels[index2]:=TLabel.Create(self);
     Labels[index2].Top := ((i-1)* lg)+13;
     Labels[index2].Parent:= Form1;
     Labels[index2].AutoSize := false;
     Labels[index2].Font.Size := 12;
     Labels[index2].Left := 10 + lg *(j-1);
     Labels[index2].Height:= lg;
     Labels[index2].Width:=lg;
     Labels[index2].Caption:= IntToStr(i)+','+(IntToStr(j));
     Labels[index2].Alignment := tacenter;
    inc(index2);
   end;
  end;

Frank
  Mit Zitat antworten Zitat