SkalierenUndKillexif funktioniert nicht

[Franki]

Hallo
Ich habe mit begeisterung angefangen FFscripte zu testen und bin auf das eine zum Scalieren gestoßen . Leider klappt es nur bis zur eingabe der Pixelzahl und der Jpg Qualität. Ich habe unten keine Schalter wie ich schon in dem Bericht unten gesehen habe. Kein OK.
Habe ich etwas falsch gemacht ?
Danke Fänki

 

[JKS]

Das Skript bedarf der Anpassung, da FF den OK und CANCEL Knopf nicht mehr automatisch erzeugt. Kleine Nachricht an den Autor ...

 

[Stefan_Berlin]

Hallo,

ich möchte auch gerne das Script benutzen und habe das gleiche Problem wie oben beschrieben.
Was muss ich anpassen ?
Kann mir jemand helfen??

Viele Grüße aus Berlin

 

[JKS]

Ich habe mir mal erlaubt, die beiden Skripte zu ändern.

 

[Franki]

Hallo
Danke für das ändern des Skript´s. Ich habe es so abgeändert daß der Eintrag vor dem alten Bildnamen erscheint. Meine Frage wäre ist es Möglich eine Afrage zu erstellen die es mir möglich macht beim ausführen des Skripts den Namen der vor die Datei gehängt wird einzugeben?

Vielen Dank
Fränki

 

[JKS]

Das ist kein Problem (und eigentlich auch der tiefere Sinn des Skriptings, individuelle Lösungen zu erzeugen). Hier ein Beispiel der Änderung für skalierenundkillexif.vbs:

' Skalierung aller Bilder durchfuehren
sub Process
dim namext
namext = InputBox("Namenszusatz beim Speichern","","Normgr_&quot
for i=0 to imagecount-1
 path = FF_GetImageName(i)
 call FF_LoadImage(path)
   exiftag = FF_HasExif()

 call StepScale(width,height) ' Verkleinern in 50% Schritten

'  call FF_HQScale (width,height,TRUE)
 call FF_Sharp(32)

 call SplitPath(path,dir,file,ext)

 if ( exiftag AND (EX_kill = 1) ) then
   call FF_KillExif()
 end if

call FF_SaveImage(dir & file & namext & ext, jpgqual)
' Wer 'Normgr_' voranstellen will, kommentiere die vorige Zeile aus und
' aktiviere die folgende
'call FF_SaveImage(dir & namext & file &  ext, jpgqual)

 call FF_SetProgress(i+1,imagecount)
next
end sub

 

[Franki]

Hallo
Nun ist es Optimal
Danke für die schnelle Hilfe
Fränki