dynamisches array mit label und textboxen zerstören ?

[agm65]

also das sollte doch alles aus dem speicher löschen:

Delphi-Quellcode:

  for i := Low(frmParams.Label1Array) to High(frmParams.Label1Array) do
  begin
     frmParams.Label1Array[i].free;
     frmParams.Text1Array[i].free;
  end;

  setlength(frmParams.Label1Array,0);
  setlength(frmParams.Text1Array,0);

jetzt sieht das beim ausladen aus als würde er ein mag durchrattern das geht wohl nicht anders oder ?