0

iWorks Pages で AppleScript-fu を実行しようとしていますが、WP ドキュメントの挿入ポイントにテキスト ボックスを挿入したいと考えています。Pages の辞書によると、挿入点というオブジェクトがあり、挿入点という要素があります。しかし、私は何も得られないようです:

tell application "Pages"
tell front document

-->set properties for text box
            set needs2Col to false
            set colHeight to 0
            if ((count of every item of headerFiles) > 5) then
                set needs2Col to true
                set boxH to (round ((count of every item of headerFiles) / 2) rounding up) * (font size of bookMarkStyle)
                set boxW to 6.5 * 72
                set boxX to 72.0
                            -->all these crash and burn with can't get errors
                            return insertion point of insertion point
                            return bounds of last paragraph of body text
                            -->all these return missing value
                            return insertion point of last paragraph of body text
                return insertion point of body text
            end if
end tell
end tell

誰でもここで私を助けてくれますか。挿入ポイントの x/y を探しているだけです。

4

1 に答える 1

0

を使用character offset of (get selection)して、選択の開始点または挿入ポイントの位置を取得できます。

tell application "Pages" to tell document 1
    --start of selection
    character offset of (get selection)

    --end of selection
    tell (get selection) to character offset + length

    --move the insertion point after the second paragraph
    select insertion point after paragraph 2

    --move the insertion point to the start of the second page
    select insertion point before (paragraph 1 where page number of containing page is 2)

    --replace the selected text
    set selection to "aa"

    --selection as plain text
    contents of selection
end tell
于 2013-09-14T16:32:38.493 に答える