[GastForen Programme Print/Bildbearbeitung Adobe InDesign Skriptwerkstatt Inhalt von Textrahmen verschieben (CS6, Win7)

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

Inhalt von Textrahmen verschieben (CS6, Win7)

cwenet
Beiträge gesamt: 1082

30. Mai 2015, 16:27
Beitrag # 1 von 3
Bewertung:
(1591 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Guten Tag,

Hans hatte mir damals geholfen (danke nochmals sehr), Notizen mit dem passenden Inhalt zu verknüpfen:
http://www.hilfdirselbst.ch/gforum/gforum.cgi?post=504889#504889

Nun wollte ich das Script für neue Bedürfnisse anpassen.
Folgendes soll es können:

Es existieren im Dokument mehrere Flächen mit unterschiedlichem Inhalt.
Diese fließen nicht im Haupttext mit. Die Flächen selber haben jeweils ein eindeutiges Scriptetikett.
Im Fließtext befindet sich ein passendes Pendant in Form eines Absatzes. Dieser Absatz enthält den String, den auch das Scriptetikett hat.

Ein Demodokument liegt bei. Auf Seite 2 ist das Wunschergebnis zu sehen.
https://www.dropbox.com/s/65az5tmzeltz5hy/container.idml?dl=0

Mein angepasstes Script findet bereits die Pendants. (siehe alerts)
Es findet aber keine Verschiebung des Inhalts statt.

Code
// das Dokument im Vordergrund  
var curDoc = app.documents[0];
// die Anzahl Textketten
var nStories = curDoc.stories.length;
// eine Schleife durch die Textketten
for (s=nStories-1; s>-1; s--) {
nNotes = curDoc.stories.item(s).paragraphs.length;
for (var n=nNotes-1; n>-1; n--) {
try {
var curNote = curDoc.stories.item(s).paragraphs.item(n);
var curName = curNote.texts.item(0).contents;
curName = curName.replace('\r','');

if (curName.indexOf("CONTAINER_") != -1) {
alert(curName);
var curText = curDoc.textFrames.itemByName(curName).parentStory;
alert(curText.contents);
var allPara = curText.paragraphs;
var styleList = new Array ();
for (var p=0; p<allPara.length; p++) {
styleList.push(allPara[p].appliedParagraphStyle.name);
}
var newPara = curText.move(LocationOptions.AFTER, curNote.storyOffset.insertionPoints[-1]);
for (var p=0; p<styleList.length; p++) {
newPara.paragraphs[p].appliedParagraphStyle = styleList[p];
}
curDoc.textFrames.itemByName(curName).remove();
}

}
catch (e) {
}
}
}


Bitte um Hilfe.
Danke
Gruß
Christoph
X

Inhalt von Textrahmen verschieben (CS6, Win7)

Hans Haesler
  
Beiträge gesamt: 5818

30. Mai 2015, 20:46
Beitrag # 2 von 3
Beitrag ID: #540137
Bewertung:
(1529 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Christoph,

das Script – etwas modifiziert – funktioniert wie erwartet:

Code
// das Dokument im Vordergrund 
var curDoc = app.documents[0];
// die Anzahl Textketten
var nStories = curDoc.stories.length;
// eine Schleife durch die Textketten
for (s=nStories-1; s>-1; s--) {
nParas = curDoc.stories.item(s).paragraphs.length;
// eine Schleife durch die Absätze
for (var n=nParas-1; n>-1; n--) {
try {
var curPara = curDoc.stories[s].paragraphs[n];
var curName = curPara.texts[0].contents;
curName = curName.replace("\r","");
if (curName.indexOf("CONTAINER_") != -1) {
var curCont = curDoc.textFrames.itemByName(curName).parentStory;
curPara.insertionPoints[-1].contents = "\r";
curCont.move(LocationOptions.AFTER, curPara.insertionPoints[-1]);
curDoc.textFrames.itemByName(curName).remove();
}
}
catch (e) {
}
}
}

Gruss, Hans


als Antwort auf: [#540133]

Inhalt von Textrahmen verschieben (CS6, Win7)

cwenet
Beiträge gesamt: 1082

31. Mai 2015, 06:48
Beitrag # 3 von 3
Beitrag ID: #540138
Bewertung:
(1456 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Guten Morgen lieber Hans,

vielen Dank für Deine Anpassung.
Es funktioniert.

Einen schönen Sonntag
Grüße
Christoph


als Antwort auf: [#540137]

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/