zur laufzeit erzeugte TImage komp freisetzen!

[ATwardz]

Also du meinst in etwa so ja?

Delphi-Quellcode:

    For j:=0 to Form1.ComponentCount do
    Begin
      If Form1.Components[j].Name='' then
      Form1.Components[j].Free;
    end;

Leider bekomme ich immer einen Listindex out of Bounds (25)

und zwar egalob ich
    For j:=0 to Form1.ComponentCount-1 oder
    For j:=1 to Form1.ComponentCount-1 oder
    For j:=0 to Form1.ComponentCount oder
    For j:=1 to Form1.ComponentCount Was mache ich falsch eigentlcih beginnt der index doch mit 0 oder etwa nicht?