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

[市川せうぞー <anonymous at unknown-host>]

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

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