AppleScript/定義済み変数(return)って……

[2540]AppleScript/定義済み変数(return)って…… | 投稿者:デューク | 投稿日:2009/03/07(Sat) 23:32:03
InDesignとは直接関係ない質問ですがお許し下さい

AppleScriptで、タブ区切りテキストを読み込んでInDesignに流し込むスクリプトを
よく作るのですが、
テキストの毎行から行末の改行を削除するとき
OS9のときは「return」と指示して改行を取っていたのですが、
OSXからはこれでは削除できないことがあります。
「CR」「CR+LF」の違いで削除できないのか良くわかりません。
行末の改行を取るにはどのように記述すればいいのでしょうか。

ついでにVBScriptの質問をもうひとつ、
CreativeSuite4のデモ版をインストールして試してみたのですが、
IllustratorCS3は、CreateObject("Illustrator.Application.4")で動作するのです
が、
IllustratorCS4は、CreateObject("Illustrator.Application.5")ではエラーになっ
てしまいました。
CreateObject("Illustrator.Application")とすればインストールされている最新
バージョンである
CS4が動作するのですが、やはりバージョンを指定して記述したいのです。
IllustratorCS4は、"Illustrator.Application.5"ではダメなのでしょうか?
» 1
[2542]Re: AppleScript/定義済み変数(return)って…… | 投稿者:たけうちとおる | 投稿日:2009/03/08(Sun) 01:33:08
改行コードがcrのShiftJISなら下記でいけますよ。

set textPath to "Macintosh HD:test.txt"
set fobj to open for access alias textPath
read fobj
set str_data to result
close access fobj

set OriginalDelimiters to AppleScript's text item delimiters
set AppleScript's text item delimiters to {return}
set str_data to text items of str_data
repeat with L from 1 to count str_data
   display dialog "#" & item L of str_data & "#"
end repeat
set AppleScript's text item delimiters to OriginalDelimiters


crlfは
set AppleScript's text item delimiters to {(ASCII character (13)) & (ASCII character (10))}

ifは
set AppleScript's text item delimiters to {ASCII character (10)}
です。

UTF16なら as Unicode textをつけます。
set textPath to "Macintosh HD:testutf16cr.txt"
set fobj to open for access alias textPath
read fobj as Unicode text
set str_data to result
close access fobj
» 2
[2544]VBScriptでIllustratorCS4 | 投稿者:お~まち | 投稿日:2009/03/08(Sun) 10:49:15
> ついでにVBScriptの質問をもうひとつ、

こちらの方ですけれど、
Illustrator.Application.CS4
です。
http://www15.ocn.ne.jp/~preopen/vb/making.html
の真ん中あたりに書いているんですが、私も全部は調べていませんので、情報がありましたら教えてください。
» 3
[2546]Re: AppleScript/定義済み変数(return)って…… | 投稿者:デューク | 投稿日:2009/03/09(Mon) 11:06:27
どちらもうまくいきました。
たけうちさん、お~まちさん、ありがとうございます。
この記事の書き込み元へのリンク (コメントや質問などはこちらへどうぞ)

このページをシェア