Hi Yves,
We once created a simple script to find text overflows, run the script and
it will find the first overflow. May be you can use it to create a more
advanced script.
// Detect overflow in AFrames
// Script detects first overflow and stops there
// copyright iDTP; versie 1.0; januari 2003
Set vCurrentDoc = ActiveDoc
Set vPgf = vCurrentDoc.FirstPgfInDoc;
Set vStop = 0; //Stop when first overflow found
Loop While((vPgf) and (vStop=0))
Set vNextPgf = vPgf.NextPgfInDoc;
Set vSubCol = vPgf.InTextObj;
If ((vSubCol.Overflowed) and (vSubCol.FrameParent.ObjectName = 'AFrame'))
// Display vSubCol.Properties;
// Position Cursor
New TextLoc NewVar(vTextLoc) Object(vPgf) Offset(0);
Set vCurrentDoc.TextSelection = vTextLoc;
Find TextRange(vTextLoc) ScrollTo;
MsgBox 'Overflow script: Overflow in Anchored Frame (see cursor).
Adapt Frame and run script again.
Set vStop = 1;
Endif;
Set vPgf = vNextPgf;
EndLoop
If (vStop = 0)
MsgBox 'Overflow script: no overflow
EndIf;
Kind regards, vriendelijke groet,
Wim Hooghwinkel
iDTP - Technical Communication Consultant
Adobe Certified Expert (ACE) in FrameMaker
tel. +31652036811
i...@idtp.eu
www.idtp.eu
_______________________________________________
You are currently subscribed to Framers as arch...@mail-archive.com.
Send list messages to fram...@lists.frameusers.com.
To unsubscribe send a blank email to
framers-unsubscr...@lists.frameusers.com
or visit
http://lists.frameusers.com/mailman/options/framers/archive%40mail-archive.com
Send administrative questions to listad...@frameusers.com. Visit
http://www.frameusers.com/ for more resources and info.
