[GastForen Programme Print/Bildbearbeitung Adobe InDesign Skriptwerkstatt Bildgröße per Skript verändern

  • Suche
  • Hilfe
  • Lesezeichen
  • Benutzerliste
Print/Bildbearbeitung - Photos, Layout, Design
Themen
Beiträge
Moderatoren
Letzter Beitrag

Bildgröße per Skript verändern

Kluftinger
Beiträge gesamt: 8

19. Apr 2010, 16:08
Beitrag # 1 von 8
Bewertung:
(4566 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Liebe Experten,

ich habe ein Skript geschrieben, um u.a. die Bildgröße automatisch zu ändern. Ich brauche als Ergebnis ein Bild mit 480 pixel Höhe in 72 dpi Auflösung. Bei meinem Skript (s.u.) bekomme ich zwar genau das, leider rechnet es mir das Bild zuerst in 72 dpi runter und dann - zumindest bei kleineren Bildern - auf 480 pixel hoch. Dadurch leidet natürlich die Bildqualität. Wie sage ich im Skript, dass das Bild zuerst auf 72 dpi OHNE Neuberechnung geändert wird und dann auf 480 pixel Höhe MIT Neuberechnung?

Gruß
Kluftinger


set Ordner to (choose folder with prompt "Wählen Sie einen Ursprungsordner") as string
set WohinPBS to choose folder with prompt "Wählen Sie einen Zielordner für die PBSeasy Daten"
set destPathlow to WohinPBS as string
tell application "System Events"
set these_files to every file of folder Ordner
end tell
repeat with i from 1 to the count of these_files
set this_file to (item i of these_files as alias)
tell application "Finder" to set fileName to name of this_file
if (count of text items of fileName) is greater than 1 then
set AppleScript's text item delimiters to "."
-- nimmt den "." als trenner des dateinamens
set fileName to text items 1 thru -2 of fileName
end if
set newFilePath to destPathlow & fileName & "_PBS.jpg"
set this_info to info for this_file
if visible of this_info is true and alias of this_info is false then
tell application "Adobe Photoshop CS4"
launch
activate
try
open this_file showing dialogs never
end try
set meinBild to the current document
try
change mode meinBild to RGB
resize image meinBild resolution 72 resample method bicubic
resize image meinBild height pixels 480 resample method bicubic
-- vielleicht auch: height: pixels 480
end try
set myOptions to ¬
{class:JPEG save options, embed color profile:true, format options:progressive, quality:6, scans:3} ¬

try
save current document in file newFilePath as JPEG with options ¬
myOptions appending no extension without copying
end try
close current document
end tell
end if
end repeat
X

Bildgröße per Skript verändern

Martin Fischer
  
Beiträge gesamt: 12685

19. Apr 2010, 17:27
Beitrag # 2 von 8
Beitrag ID: #439536
Bewertung:
(4542 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Kluftinger,

Hans Haesler hat ein ähnliches Skript überarbeitet: Bilder100Prozent_01d.scpt .

Schau mal nach, ob er's –und wenn ja – wie er's dort gelöst hat.


als Antwort auf: [#439516]
(Dieser Beitrag wurde von Martin Fischer am 19. Apr 2010, 17:28 geändert)

Bildgröße per Skript verändern

Kluftinger
Beiträge gesamt: 8

20. Apr 2010, 09:37
Beitrag # 3 von 8
Beitrag ID: #439592
Bewertung:
(4512 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Martin,

bin das verlinkte Skript (Hut ab!) mal durchgegangen, habe aber nichts brauchbares finden können, was aber auch an mir liegen kann.

Gruß
Kluftinger


als Antwort auf: [#439536]

Bildgröße per Skript verändern

Freeday
Beiträge gesamt: 5712

20. Apr 2010, 09:53
Beitrag # 4 von 8
Beitrag ID: #439597
Bewertung:
(4506 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Antwort auf [ Kluftinger ] resize image meinBild resolution 72 resample method bicubic
resize image meinBild height pixels 480 resample method bicubic


Liegt hier der Hund nicht einfach im oberen "resample method" begraben? Bei
"resize image meinBild resolution 72" soll ja gar nix "resampled" werden…
• resize auf 72dpi
• bestätigen
• resize auf 480px mit neuberechnung bikubisch

(Ich habe keine Ahnung von Skripts – aber ich bin lernfähig. Wenn was falsch
oder so nicht machbar ist bitte korrigieren :P)

Gruss Stefan


als Antwort auf: [#439516]

Bildgröße per Skript verändern

Kluftinger
Beiträge gesamt: 8

20. Apr 2010, 10:17
Beitrag # 5 von 8
Beitrag ID: #439603
Bewertung:
(4488 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Stefan,

klang gut, aber leider rechnet das Skript auch dann die Dateigröße um, wenn nur "resize auf 72 dpi" dasteht.

Gruß
Kluftinger


als Antwort auf: [#439597]

Bildgröße per Skript verändern

Martin Fischer
  
Beiträge gesamt: 12685

20. Apr 2010, 11:30
Beitrag # 6 von 8
Beitrag ID: #439630
Bewertung:
(4482 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Was passiert, wenn die beiden Befehle
Code
resize image meinBild resolution 72 resample method bicubic  
resize image meinBild height pixels 480 resample method bicubic


zusammengefasst werden zu einem?
Code
resize image meinBild height pixels 480 resolution 72 resample method bicubic 



als Antwort auf: [#439603]

Bildgröße per Skript verändern

Kluftinger
Beiträge gesamt: 8

20. Apr 2010, 16:26
Beitrag # 7 von 8
Beitrag ID: #439684
Bewertung:
(4436 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Martin,

dann passiert genau das was ich wollte.
Manchmal kann es so einfach sein.

Vielen Dank allen (besonders natürlich Martin)

Gruß
Kluftinger


als Antwort auf: [#439630]

Bildgröße per Skript verändern

Martin Fischer
  
Beiträge gesamt: 12685

20. Apr 2010, 16:29
Beitrag # 8 von 8
Beitrag ID: #439685
Bewertung:
(4436 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Kluftinger,

Deine Antwort verschafft auch mir Erleichterung. ;-)

Good work.
Martin


als Antwort auf: [#439684]
X

Aktuell

Veranstaltungskalender

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch wie z.B. Adobe InDesign, Photoshop, Illustrator, PDF, Pitstop, Affinity, Marketing, SEO, Büro- und Rechtsthemen etc. haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen.

pdf-icon Hier eine kleine Anleitung hinsichtlich Bedeutung der auszufüllenden Formularfelder.

Veranstaltungen
01.03.2023 - 09.03.2023

Online
Mittwoch, 01. März 2023, 00.00 Uhr - Donnerstag, 09. März 2023, 00.00 Uhr

Online Webinar

Wie gehen wir mit diesen Veränderungen um? Was ist notwendig, damit wir die Digitalisierung im Unternehmen klappt? Veränderungsprozesse verstehen und entsprechend handeln Mitarbeiter als Botschafter Webseite mit WordPress erstellen SEA /SEO (Ads aufschalten)

Ja

Organisator: B. Isik - SNF Academy

Kontaktinformation: B. Isik, E-Mailinfo AT snfa DOT ch

https://www.fernstudiumfitness.ch/digitalisierung-schweiz/