Bilder verwatlen

[arbu man]

Guck dir mal die Typen TObjectList und TBitmap an.

Das kann so aussehen:

Code:

  progressbar.max := anzazhl_bilder
  for i:= 0 to anzazhl_bilder do begin
    bild in bitmap laden
    objectlist.add(bitmap)
    progressbar erhöhen
  end

Herzlich Willkommen in der DP

mfg, Björn