Dies ist eine alte Version des Dokuments!

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