[GastForen Programmierung/Entwicklung AppleScript Markierten Text verschieben

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

Markierten Text verschieben

Hans Haesler
  
Beiträge gesamt: 5826

7. Mär 2004, 10:47
Beitrag # 1 von 4
Bewertung:
(1012 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Michael Slomski hat im QuarkXPress-Forum den Wunsch geäussert, eine manuelle Tätigkeit zu automatisieren. Thema "Markierten Text löschen und woanders einsetzen", http://www.page-online.de/page/forum/viewthread/2167

Er hat später selbst eine funktionierende Löung gefunden. Doch den aktuellen Absatz kann man direkter herausfinden. Zudem sollten lokale Formatierungen erhalten bleiben. Und man sollte auch eine Fehlermeldung abfangen, welche unweigerlich gezeigt wird, wenn der "nächste Absatz" nicht existiert.

Zuerst wird der Offset der Auswahl festgestellt. Dies ist die Anzahl Zeichen, welche sich vor dem ersten ausgewählten Zeichen befinden – vom Anfang der Textkette an gezählt. Wenn dieser Wert aber Null ist, dann beginnt die Auswahl mit dem ersten Zeichen. Es befinden sich keine anderen davor, deshalb die '0'. Und deshalb muss der Wert auf '1' gesetzt werden, damit durch den Befehl, welcher die Absätze zählt, keine Fehlermeldung generiert wird.

Wenn die Anzahl Absätze feststehen, wird versucht (= 'try'), einen Zwischenraum vor den nächsten Absatz zu setzen. Gelingt dies, dann wird auch der nächste Befehl funktionieren. Gelingt es nicht, dann wird ein Dialog gezeigt, welcher den Anwender informiert.

Durch den Gebrauch von 'move contents' werden auch eventuelle lokale Formatierungen mit verschoben.
---
tell document 1 of application "QuarkXPress 4.11"
  activate
  set insPoint to offset of selection
  if insPoint = 0 then set insPoint to 1
  tell current box
    tell story 1
      set paraNum to count paragraphs of (text from character 1 to character insPoint)
    end tell
  end tell
  try
    copy space to before paragraph (paraNum + 1) of story 1 of current box
    move contents of selection to before paragraph (paraNum + 1) of story 1 of current box
  on error
    display dialog "Die Auswahl kann nicht vor den
nächsten Absatz kopiert werden,
weil sie sich im letzten der Textkette
befindet." buttons "OK" default button 1 with icon 0
  end try
end tell
---
Man sollte aber noch mehr 'error handling' einbauen: Ist ein Dokument geöffnet? Ist Text ausgewählt?

Hans Haesler <hsa@ringier.ch>
X

Markierten Text verschieben

Anonym
Beiträge gesamt: 22827

8. Mär 2004, 23:47
Beitrag # 2 von 4
Beitrag ID: #418663
Bewertung:
(1011 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Hans,
gut, das es dich gibt. Geht also doch noch etwas eleganter, die Geschichte mit dem Absatzzählen :-))
Und jetzt könnte ich sogar die Formatierungen mit nehmen. Nur brauchte ich witklich nur den Text.. Er bekommt an der eingefügten Stelle eine gänzlich anderes Format zu gewiesen. Nur habe ich die Zeile gemeinerweise aus meinem Beispiel gelöscht :-)

Gruß Michael


als Antwort auf: [#418662]

Markierten Text verschieben

Hans Haesler
  
Beiträge gesamt: 5826

9. Mär 2004, 08:41
Beitrag # 3 von 4
Beitrag ID: #418664
Bewertung:
(1011 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Michael,

ahaaa &#133; und zum Neuformatieren benötigst Du auch die Anzahl Zeichen der Auswahl = 'selLength'
(der Wert, der in Deinem Beispiel zwar gespeichert, aber nicht verwendet wird).

Hans Haesler <hsa@ringier.ch>


als Antwort auf: [#418662]

Markierten Text verschieben

Anonym
Beiträge gesamt: 22827

9. Mär 2004, 21:04
Beitrag # 4 von 4
Beitrag ID: #418665
Bewertung:
(1011 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Naja, einfach nur den Text verschieben ist ja auch langweilig. Der muß schon ordentlich durch die Formatierungsmühle damit was gescheites rauskommt.

Gruß Michael


als Antwort auf: [#418662]
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
14.05.2024

Online
Dienstag, 14. Mai 2024, 10.00 - 10.30 Uhr

Webinar

Prozessoptimierung ist ein Teamsport! Keine Software und keine Maschine allein kann Ihnen helfen, die Effizienzpotenziale Ihres Betriebes maximal auszuschöpfen. Von der Auftragsannahme über die Vorstufe und den Druck bis hin zur Weiterverarbeitung – alles muss optimal ineinandergreifen. Apropos Weiterverarbeitung – in vielen Druckbetrieben fristet sie in Sachen Prozessoptimierung immer noch ein Schattendasein. Dabei liegen hier mittlerweile die größten Einsparpotenziale! In einem Webinar von Horizon und Impressed erfahren Sie, wie Sie diese Einsparungen realisieren können. Horizon, bekannt für innovative Lösungen in der Druckweiterverarbeitung, bietet mit iCE LiNK eine Workflowlösung für die Weiterverarbeitung. iCE LiNK überwacht, visualisiert und analysiert Produktionsabläufe und unterstützt bei der Wartung – damit immer alles reibungslos läuft. Den gleichen Anspruch hat der von Impressed entwickelte Impressed Workflow Server – er ist die smarte PDF-Workflow-Lösung für Druckereien, die Datenmanagement, Preflight und Produktionssteuerung übernimmt. Im Webinar zeigen Ihnen die Experten von Horizon und Impressed, wie beide Lösungen im Team die Effizienz und Produktivität Ihres Betriebes steigern können. Melden Sie sich am besten gleich an, wir freuen uns auf Sie! PS: Melden Sie sich in jedem Fall an – sollten Sie zum Termin verhindert sein, erhalten Sie die Aufzeichnung.

kostenlos

Ja

Organisator: Impressed / Horizon

https://www.impressed.de/schulung.php?c=sDetail&sid=327

Einsparpotenziale in der Weiterverarbeitung
Veranstaltungen
16.05.2024

Online
Donnerstag, 16. Mai 2024, 10.00 - 10.30 Uhr

Webinar

Komplizierte, kleinteilige Aufträge; alles sehr speziell; seit Jahren bewährte Prozesse – da können wir nichts standardisieren und automatisieren! Das sagen viele Großformatdrucker – aber stimmt das wirklich, ist dem tatsächlich so? Günther Business Solutions und Impressed treten in einem Webinar den Gegenbeweis an. Experten beider Unternehmen zeigen, wie Großformatdrucker vom Einsatz zweier bewährter Lösungen profitieren können: • von advanter print+sign von Günther Business Solutions, dem ERP-System für den Großformatdruck, dass alle Phasen der Wertschöpfung im Large Format Printing abdeckt • von Impressed Workflow Server, der smarten PDF-Workflow-Lösung für Druckereien, die Datenmanagement, Preflight und Produktionssteuerung übernimmt Über die Kombination beider Lösungen können Großformatdrucker ihre Prozesse mit modernen Workflows Schritt für Schritt automatisieren – und so zügig deutliche Zeit- und Kosteneinsparungen realisieren. Das Webinar sollten Sie sich nicht entgehen lassen – damit Sie keine Effizienzpotenziale mehr liegen lassen. Melden Sie sich am besten gleich an, wir freuen uns auf Sie! PS: Melden Sie sich in jedem Fall an – sollten Sie zum Termin verhindert sein, erhalten Sie die Aufzeichnung.

kostenlos

Nein

Organisator: Impressed / Günther Business Solutions

https://www.impressed.de/schulung.php?c=sDetail&sid=326

Und es geht doch: Automatisierung im Großformatdruck!