[GastForen Programmierung/Entwicklung AppleScript Phs-Pfad als Textverdränger

  • Suche
  • Hilfe
  • Lesezeichen
  • Benutzerliste
Themen
Beiträge
Moderatoren
Letzter Beitrag

Phs-Pfad als Textverdränger

Anonym
Beiträge gesamt: 22827

31. Jul 2008, 18:58
Beitrag # 1 von 5
Bewertung:
(1267 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Hans,

Freistell-Bilder, die einen modifizierten Phs-Pfad als Textverdränger enthalten, lassen sich nicht problemlos auf 100% skalieren (Verdränger ändert sich)
Deshalb möchte ich einen unabhängigen Textverdränger erstellen.

Händisch gehe ich so vor:
1. Das aktive Bild Duplizieren (gleiche Position)
2. Das Dupli auf eine Ebene "VerdrängerEbene" moven
3. Dem Dupli den Photoshop Pfad "Textverdränger" als Beschneidungspfad zuweisen
  (Pfad existiert immer)
4. Den Beschneidungspfad in einen Rahmen umwandeln und den Inhalt (Bild) löschen
5. Den Rahmen auf Umfließen 1mm stellen

Als Script komme ich bis auf das Dupli und moven auf die "Ebene "Verdränger"
nicht weiter.

--
tell document 1 of application "Adobe InDesign CS2"
    activate
      try
        set myLayer to layer "Verdränger-Ebene"
    on error
        set myLayer to make layer with properties {name:"Verdränger-Ebene"}
    end try
    set curSel1 to selection
            set linkPicID to id of graphic 1 of item i of curSel1
            make (duplicate) of curSel1
        move selection to layer "Verdränger-Ebene"
end tell
--
Gruss willem
X

Phs-Pfad als Textverdränger

Hans Haesler
  
Beiträge gesamt: 5805

1. Aug 2008, 06:28
Beitrag # 2 von 5
Beitrag ID: #422537
Bewertung:
(1266 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Willem,

so sollte es funktionieren ...
---
tell document 1 of application "Adobe InDesign CS2"
   activate
   try
      set newLayer to layer "Verdränger-Ebene"
   on error
      set newLayer to make layer with properties ¬
         {name:"Verdränger-Ebene"}
   end try
   set curSel to duplicate selection
   set selection to {}
   move curSel to layer "Verdränger-Ebene"
   tell clipping path of graphic 1 of curSel
      set newFrame to convert to frame
   end tell
   tell newFrame
      delete graphic 1
      set content type to unassigned
      tell text wrap preferences
         set properties to {text wrap type:contour, text wrap offset:"1 mm"}
      end tell
   end tell
end tell
---
... aber nur, wenn der Photoshop-Pfad "Textverdränger" als Maske definiert ist. Eine Umstellung, welche Du eventuell von Hand machst, ist per Script nicht möglich.

Der Befehl set content type to unassigned wandelt den Bildrahmen in einen Rahmen ohne Inhalt (= ohne störendes Kreuz).

Gruss, Hans


als Antwort auf: [#422536]

Phs-Pfad als Textverdränger

Anonym
Beiträge gesamt: 22827

1. Aug 2008, 17:58
Beitrag # 3 von 5
Beitrag ID: #422538
Bewertung:
(1266 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Hans,
habe den Textverdränger als Beschneidungspfad zugewiesen...
... das Script gestartet - es funktioniert!

Nur falls möglich:
kann man am Schluß den Beschneidungspfad am Original per Script deaktivieren?
da Freisteller mit Ebenenmasken freigestellt sind (weiche Kante)

herzlichen Dank
willem


als Antwort auf: [#422536]

Phs-Pfad als Textverdränger

Hans Haesler
  
Beiträge gesamt: 5805

1. Aug 2008, 19:51
Beitrag # 4 von 5
Beitrag ID: #422539
Bewertung:
(1266 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Willem,

mit dem an das Originalbild gerichteten Befehl set clipping type of clipping path to none sollte es klappen.
---
tell document 1 of application "Adobe InDesign CS2"
   activate
   try
      set newLayer to layer "Verdränger-Ebene"
   on error
      set newLayer to make layer with properties ¬
         {name:"Verdränger-Ebene"}
   end try
   set origSel to graphic 1 of selection
   set curSel to duplicate selection
   set selection to {}
   move curSel to layer "Verdränger-Ebene"
   tell clipping path of graphic 1 of curSel
      set newFrame to convert to frame
   end tell
   tell newFrame
      delete graphic 1
      set content type to unassigned
      tell text wrap preferences
         set properties to {text wrap type:contour, text wrap offset:"1 mm"}
      end tell
   end tell
   tell origSel
      set clipping type of clipping path to none
   end tell
end tell
---
Gruss, Hans


als Antwort auf: [#422536]

Phs-Pfad als Textverdränger

Anonym
Beiträge gesamt: 22827

2. Aug 2008, 07:56
Beitrag # 5 von 5
Beitrag ID: #422540
Bewertung:
(1266 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Hans,

Danke !!! - Es funktioniert.

herzlichen Gruss
willem


als Antwort auf: [#422536]
X

Aktuell

PDF / Print
kalenderFebruar_kl

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
05.02.2021 - 05.11.2021

Digicomp Academy AG, Limmatstrasse 50, 8005 Zürich
Freitag, 05. Feb. 2021, 13.00 Uhr - Freitag, 05. Nov. 2021, 17.00 Uhr

Lehrgang

Bilden Sie sich zum zertifizierten Publishing-Multimedia-Profi aus. Neben Fotografie und Video befassen Sie sich mit der Medienproduktion, digitalen Publikationen und dem Webdesign für Desktop- und mobile Endgeräte.

Preis: CHF 10'500.-
Dauer: 30 Tage (ca. 210 Lektionen) – Unterricht findet jeweils am Freitag von 13 - 19 Uhr und Samstag von 09 - 17 Uhr statt

Ja

Organisator: Digicomp Academy AG

Kontaktinformation: Kundenberater-Team, E-Mailkundenberatung AT digicomp DOT ch

digicomp.ch/d/9PM

Veranstaltungen
30.07.2021

Chur, SNF Academy Birol Isik
Freitag, 30. Juli 2021, 07.45 - 20.00 Uhr

Onlinekurs

Digitalisierung Chancen & Herausforderungen CRM / Kundenbetreuung Produkte digitalisieren Unternehmenskommunikation Content Publishing

Ja

Organisator: Birol Isik

Kontaktinformation: Birol Isik, E-Mailinfo AT snfa DOT ch

https://www.snfa.ch/fitness-training-schweiz