Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by BBoy,
22. Mär 2010
auch wenn ich die 1 in i ändere funktioniert das nicht.
Warum ich das so mache? Die anzahl der rzstatuspanes ändert sich bei jeder aktualisierung. mal sind es 10 mal 15 oder so. Daher dachte ich diese vorgehweise wäre angebracht.
Habe es mal testhalber so probiert:
for i := 1 to 40 do begin
try
rzstatuspane.Free;
rzstatuspane := nil;
except
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by BBoy,
22. Mär 2010
Ich erzeuge zur Laufzeit komponenten
RzStatusPane := TRzStatusPane.Create(self);
RzStatusPane.Parent := rzpanel73;
RzStatusPane.Left := LeftPos;
RzStatusPane.Top := TopPos;
RzStatusPane.Width := 125;
Rzstatuspane.ParentFont := True;
Rzstatuspane.Name := 'rzstatuspane'+inttostr(i);
RzStatusPane.Caption:= Produkt+': '+produktanz;