• Open Menu Close Menu
  • Apple
  • Shopping Bag
  • Apple
  • Mac
  • iPad
  • iPhone
  • Watch
  • TV
  • Music
  • Support
  • Search apple.com
  • Shopping Bag

Lists

Open Menu Close Menu
  • Terms and Conditions
  • Lists hosted on this site
  • Email the Postmaster
  • Tips for posting to public mailing lists
Re: Quark auto text place
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Quark auto text place


  • Subject: Re: Quark auto text place
  • From: Luca Pozzato <email@hidden>
  • Date: Thu, 07 Oct 2004 20:08:16 +0200

Hi Ian

May be you can work on somthing like this



tell application "QuarkXPress Passport 4.11"
    activate
    -- units are mm
    tell document 1
        set x_offset to 0

        repeat with myid from 10 to 13
            make new picture box at beginning of page 1 with properties
{name:("Image_" & myid), bounds:{0, 0 + x_offset, 50, 50 + x_offset}}
            make new text box at beginning of page 1 with properties
{name:("TEXT_" & myid), bounds:{50, 0 + x_offset, 60, 50 + x_offset}}
            set paragraph 1 of text box (("TEXT_" & myid) as text) of page 1
to "This id=" & myid
            set x_offset to x_offset + 53
        end repeat

        --- When you call a picture or text box by name you may change its
properties
--Names of these objects become part of your document
        set paragraph 1 of text box (("TEXT_" & 12) as text) of page 1 to
"This id=" & "CHANGED"

    end tell
end tell

Let me know

Ciao

Luca

> From: "Buttery, Ian" <email@hidden>
> Date: Thu, 7 Oct 2004 11:56:31 +0100
> To: <email@hidden>
> Subject: Quark auto text place
>
> Hi,
>
> I'm trying to place images and create text into a specified boxes within a
> Quark document.
> The images work fine and the text will create but only if I select the text
> box in the Quark document and specify it in the script as the current box -
> when I try to do this automatically by using a UniqueID I get the following
> error . . .
>
> QuarkXPress got an error: Can't get text box id 4930.
>
> The code is as follows . . .
>
>
> set theMessage to ""
> set theFolder to (choose folder with prompt "Select Image Folder") as string
> set theList to list folder theFolder without invisibles
> tell application "QuarkXPress Passport"
> tell document 1
> repeat with eachFile in theList
> set theName to text 1 thru 2 of eachFile & "_Image"
> try --will error if image is not compatible
> tell picture box theName
> set image 1 to (theFolder & eachFile) as alias
> set bounds of image 1 to exact fit
> end tell --picture box
> on error
> set theMessage to theMessage & eachFile & return
> end try
> end repeat
>
> end tell
> end tell
> if theMessage is not "" then
> display dialog theMessage
> end if
>
>
>
> tell application "QuarkXPress Passport"
>
>
> --if content of text box id 4930 is text content then
> tell text box id 4930 to make new text at beginning with properties
> {contents:"£179"}
> end tell
> --end if
>
> Ian Buttery
> Database & Technical Support Manager
> Tel: 01733 843514
> Email: email@hidden
>
>
>
>
> ************************************************************************
> Thomas Cook - The ultimate expert in leisure travel, visit us at
>
> www.thomascook.com or tune in to Thomas Cook TV on Sky
> Digital Channel 648 or ntl:home channel 857 or visit us at...
>
> www.jmc.com www.tcsignature.com www.style-holidays.co.uk
> www.neilson.co.uk www.club18-30.co.uk www.blueskyholidays.com
> www.culturatrips.com www.sunset-holidays.com
> www.roomsandhotels.com
>
> This email is confidential, may be legally privileged, and is for
> the intended recipient only. Access, disclosure, copying,
> distribution or reliance on any of it by anyone else is prohibited
> and may be a criminal offence. Please delete if obtained in error.
> Any views expressed in this message are those of the individual
> sender, except where the sender specifically states them to be
> the views of Thomas Cook UK Ltd.
>
> **************************************************************************
>
> _______________________________________________
> Do not post admin requests to the list. They will be ignored.
> Applescript-users mailing list      (email@hidden)
> Help/Unsubscribe/Update your Subscription:
> a.it
>
> This email sent to email@hidden
>


 _______________________________________________
Do not post admin requests to the list. They will be ignored.
Applescript-users mailing list      (email@hidden)
Help/Unsubscribe/Update your Subscription:

This email sent to email@hidden

References: 
 >Quark auto text place (From: "Buttery, Ian" <email@hidden>)

  • Prev by Date: RE: Word length - resolved
  • Next by Date: mail.app forgetting changes
  • Previous by thread: Quark auto text place
  • Next by thread: Process list of numbers
  • Index(es):
    • Date
    • Thread