(DTPtechNote:1416) [AS_Indesign CS]マイナーバージョンの取得

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

Indesign CS2なら
tell app "Adobe Indesign CS2_J"
version
end
で、リリースバーションまで親切にでてくるんだけど（"4.0.2.633"）、CSだと3.0としか教えてくれない。
きっと数値変換しやすいからなんだろうけど、サブバージョンで組版が変わるソフトなんだからこれはちゃんとわからないとまずい。
とても泥臭い方法だけど。

tell application "Finder"
	set ind_path to path to application "InDesign CS_J"
	set ind_info to info for ind_path
	set ind_ver to long version of ind_info
	set ind_ver to item 1 of my as_split(",", ind_ver)
end tell

to as_split(thedelimit, theText)
	set oldDelim to AppleScript's text item delimiters
	set AppleScript's text item delimiters to thedelimit
	set tmpList to every text item of theText
	set AppleScript's text item delimiters to oldDelim
	return tmpList
end as_split