Image "Variable" erhöhen

[Matze]

FindComponent kannst du einen String übergeben, nach dessen Komponentename dann gesucht wird, wie Michael gezeigt hat.
Daher kannst du damit auch so etwas übergeben:

Delphi-Quellcode:

// Schleife:
i := ...;

(FindComponent('Image' + IntToStr(i))as TImage).Picture.Bitmap.PixelFormat := pf24bit;

if ( { ... } ) then
  inc(i);

"i" ist dabei die Laufvariable für Image1, Image2, Image3, ...