Einzelnen Beitrag anzeigen

150gozilla

Registriert seit: 1. Sep 2005
Ort: Taunusstein
116 Beiträge
 
Delphi 5 Professional
 
#16

Re: Auf Dynamisch erstellte Labels zugreifen

  Alt 20. Okt 2006, 11:39
Zitat von Mavarik:
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
Dankeeeeeeee, das klappt 100%ig.

Danke an alle die mir geholfen haben
Hab wieder was gelernt =)
Danke nochmal =)
Chris
  Mit Zitat antworten Zitat