Computerverzeichnis einlesen

  Dim AnzahlBilder
  Dim ListeBilder                              ' Array für die Bilder ohne () definieren!, sonst funktiniert Split() nicht
  AnzahlBilder = FF_GetImageCount
 
  if AnzahlBilder = 0 then                     ' kein Bild markiert, es werden alle Bilder berücksichtigt
       ListeBilder = split(FF_GetSelection(0), vbNewLine)
       AnzahlBilder = ubound(ListeBilder) + 1
  else                                         ' es wurden Bilder markiert, nur diese werden berücksichtigt
       ListeBilder = split(FF_GetSelection(1), vbNewLine)
       AnzahlBilder = ubound(ListeBilder) + 1
  end if
 
  'mit FF_GetSelection(2) erhält man alle Bilder der aktuellen Bilderliste
  'mit FF_GetSelection(3) erhält man die selektierten Bilder der aktuellen Bilderliste