finding overset boxes in Quark 4.11
finding overset boxes in Quark 4.11
- Subject: finding overset boxes in Quark 4.11
- From: "Chitty, Butch" <email@hidden>
- Date: Mon, 1 Mar 2004 10:43:36 -0600
Greetings!
I'm working on a simple script to locate text boxes in a Quark 4.11
document that have text overflow. I'm getting "Can't make data into
expected type" and "Access not allowed" errors on the 'if box wraps is
false' and 'if box overflows' lines. Anyone have any idea what I might be
doing wrong? I'm on AS 1.6/OS 9.2.1.
thanks in advance,
Butch
on open (theDoc)
tell application "Finder" to open theDoc
set prevOverset to 1
set boxID to findOverset(prevOverset)
if boxID = 0 then
display dialog "No oversets found here, buddy!"
else
display dialog "Box " & (boxID as string) & " is overset!"
end if
end open
on findOverset(prevOverset)
tell application "QuarkXPress(tm) 4.11"
tell document 1
set boxID to 0
repeat with i from prevOverset to (count of text boxes)
tell text box i
if box wraps is false then
if box overflows then
set boxID to i
exit repeat
end if
end if
end tell
end repeat
end tell
end tell
return boxID
end findOverset
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.