Zitat von
mkinzler:
Am Besten erstellst du einen Panle auf dem du die Labels erzeugst und das du als Owner setzt. Dann reicht es dieses Freizugeben und neu erstellen zu lassen.
mKinzler, muß das Panel während der Laufzeit erzeugt werden, oder genügt es die Komponente einfach
auf das Formular zu ziehen und dann diesen zu machen?:
Delphi-Quellcode:
with Panels1 do //<- Geht das so?
begin
tage:=DaysInMonth;
SetLength(Labels,tg+1);
for index:=1 to tage do
begin
Labels[index]:=TLabel.Create(self);
If ((Labels[index].top+Labels[index].height)*index2+150) >= Form1.ClientHeight then
begin
inc(Reihe); index2:=1;
Labels[index].left:=150*Reihe;
Labels[index].Top:= 10+(index2*20);
end;
Labels[index].Top := 10+(index2*20);
Labels[index].Parent:= Form1; //<- Panel1
Labels[index].AutoSize := false;
Labels[index].Font.Size := 10;
......
......
end;