[GastForen Programmierung/Entwicklung AppleScript Linke und rechte Seiten QXP4.11

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

Linke und rechte Seiten QXP4.11

Anonym
Beiträge gesamt: 22827

28. Jan 2005, 06:31
Beitrag # 1 von 5
Bewertung:
(557 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo,
ich hane folgendes Vorhaben:
Es sollen via AppleScript Stilvorlagen bestimmten Absätzen zugewiesen werden.
Alle Absätze die sich auf einer linken Seite befinden sollen die Stilvorlage "AbsatzLinks" erhalten. Und das für das komplette Dokument.
Das Gleiche soll auch auf rechte Seiten passieren. Dort sol die Stilvorlage "AbsatzRechts" zum Einsatz kommen.

Im Dokument selbst befindet sich kein Text. Es handelt sich ledglich um
verankerte Bildrahmen.

Wie läßt sich das realisieren?

Gruss
X

Linke und rechte Seiten QXP4.11

Hans Haesler
  
Beiträge gesamt: 5816

28. Jan 2005, 09:25
Beitrag # 2 von 5
Beitrag ID: #419302
Bewertung:
(556 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo cwenet,

hier eine Lösung: Eine Wiederholschleife, welche durch alle Seiten geht. Von jeder Seite wird der "Name", das
heisst die Seitennummer, welche als Pagina gedruckt würde, geprüft. Wenn die Zahl mit dem Operatoren 'mod'
geteilt wird, ist das Resultat (der Restwert) entweder '0' oder '1'. Je nach Ergebnis wird der Variablen 'curSheet'
die entsprechende Stilvorlage zugeteilt.

In der inneren Repeatschleife werden die Textboxen adressiert. Jedem Text wird gesagt, dass er jedem Absatz die
Stilvorlage 'curSheet' zuweisen soll:
---
tell document 1 of application "QuarkXPress 4.11"
    activate
    repeat with i from 1 to count of pages
        tell page i
            if (name as integer) mod 2 = 0 then
                set curSheet to "AbsatzLinks"
            else
                set curSheet to "AbsatzRechts"
            end if
            repeat with j from 1 to count of text boxes
                try
                    tell text box j
                        tell text 1
                            set style sheet of every paragraph to curSheet
                        end tell
                    end tell
                end try
            end repeat
        end tell
    end repeat
end tell

---
Problematisch wird es, wenn Textboxen vorhanden sind, welche nicht behandelt werden sollen (z.B. die Pagina).
Wenn dies der Fall sein sollte, bitte melden.

Gruss, Hans


als Antwort auf: [#419301]

Linke und rechte Seiten QXP4.11

Anonym
Beiträge gesamt: 22827

28. Jan 2005, 10:12
Beitrag # 3 von 5
Beitrag ID: #419303
Bewertung:
(556 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Genial Hans.
Es geht. Danke.

Aber Du hast recht. Soweit habe ich garnicht gedacht. Es hat natürlich
noch andere Textboxen auf der Seite.
Es soll aber nur der Haubttextrahmen behandelt werden.
Ich könnte den betroffenen Textrahmen aber mit einem Namen versehen.

Wäre das hilfreich?

Gruss
Christoph


als Antwort auf: [#419301]

Linke und rechte Seiten QXP4.11

Hans Haesler
  
Beiträge gesamt: 5816

28. Jan 2005, 10:33
Beitrag # 4 von 5
Beitrag ID: #419304
Bewertung:
(556 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Christoph,

ja, das wäre sehr hilfreich. Damit werden alle anderen Boxen ausgeschlossen. Und die Repeatschleife erübrigt sich:
---
tell document 1 of application "QuarkXPress 4.11"
    activate
    repeat with i from 1 to count of pages
        tell page i
            if (name as integer) mod 2 = 0 then
                set curSheet to "AbsatzLinks"
            else
                set curSheet to "AbsatzRechts"
            end if
            try
                tell text box "hauptbox"
                    tell text 1
                        set style sheet of every paragraph to curSheet
                    end tell
                end tell
            end try
        end tell
    end repeat
end tell

---
Am besten wird beim Vorbereiten des Dokuments eine Box erstellt, benannt und auf die Musterseiten plaziert
(die Box muss auf einer Dokumentseite liegen, damit sie benannt werden kann).

Gruss, Hans


als Antwort auf: [#419301]

Linke und rechte Seiten QXP4.11

Anonym
Beiträge gesamt: 22827

28. Jan 2005, 10:59
Beitrag # 5 von 5
Beitrag ID: #419305
Bewertung:
(556 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Ok. Läuft wunderbar.
Vielen Dank, Hans.


als Antwort auf: [#419301]
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
02.02.2023

Prozesse optimieren und effizient gestalten

Zürich
Donnerstag, 02. Feb. 2023, 08.00 - 10.00 Uhr

Digitalisierung, Webauftritt

Digitalisierung mitgestalten - Worauf kommt es an? Wie wichtig ist die Webseite? Webseite mit Word Press? Interne Prozesse optimieren

Ja

Organisator: B. Isik - SNF Academy

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

https://digitalisierung-heute.ch/digitalisierung-informationstag-schweiz/

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/