Einzelnen Beitrag anzeigen

thomas2009
(Gast)

n/a Beiträge
 
#1

Controls suchen und löschen

  Alt 17. Mär 2011, 22:36
Hi

ich möchte Controls (AlsBeispiel Images) in ScrollBox1 löschen
was komisch ist, von 4 Images werden nur 2 gelöscht und zwar,
die erste und die dritte !!!
Fehlermeldung sagt :
Listenindex überschreitet das maximum (2)

Delphi-Quellcode:
var
i: Integer;
begin

  for i := 0 to ScrollBox1.ComponentCount-1 do
  begin
    if (ScrollBox1.Components[i] is TImage) then
    ScrollBox1.Controls[i].Free;
  end;
end;
Woran liegt es ?

Geändert von Luckie (18. Mär 2011 um 05:56 Uhr) Grund: Titel korrigiert
  Mit Zitat antworten Zitat