moin leutz,
ich sitze grad an nem kleinen progi von mir,welches auch eine nette kleine druck funktion beherbergt.
und zwar habe ich einen report gemacht, den ich mit einr bestimmtananzahl an zeilen ausgestattet habe. jede zeile besteht aus 5 labels!
so, jetzt möchte ich durch eine schleife die labels leeren!
des habe ich so umsetzen wollen:
Delphi-Quellcode:
for a := 0 to form2.ComponentCount - 1 do
begin
if Components[a] is TQRPLabel then
if TQRPLabel(Components[a]).Caption = '0' then
TQRPLabel(Components[a]).Caption := '';
end;
durch das debuggen konnte ich feststellen, des componentcount bei 105 liegt. auf der form sind 90 labels! nur bricht er mit nem listenindexfehler bei 49 ab! ohne auch nur einmal die erste if abfrage mit true weiterzumachen.
nur verstehe ich es nicht! kann einer von euch etwas damit anfangen?
mfg matthias