====== Computerverzeichnis einlesen ======

<code VBScript [enable_line_numbers="true"]>
  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
</code>