[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

(DTPtechNote:1042) Re: テキストボックスの連結削除など



なんとなくこんな感じでできましたけど^^
もし、途中まで書いたものがあれば、一緒に上げていただくとよりよいかもしれません。

tell application "InDesign CS_J"
	activate
	tell document 1
		set textframA to text frame 2 --1番目のテキストフレーム(ストーリーの始め)
		set textframB to text frame 1 --2番目のテキストフレーム(まだ連結されていない)
		
		--テキストフレームの連結
		tell textframA
			set next text frame to textframB
		end tell
		
		delay 2 --ちょっと2秒
		
		--テキストの削除
		tell textframB
			--if overflows then display dialog "テキストがオーバーフローしています" as Unicode text buttons "キャンセル"
			set contents to ""
		end tell
		
		delay 2 --ちょっと2秒
		
		--フレーム連結の解除
		tell textframA
			set next text frame to ""
		end tell
		
	end tell
end tell