editsetting.rsc の仕様を少し変更しました。

いじくるつくーるに付属しているeditsetting.rscと下のアドレスのeditsetting.rscを差し替えてをお願いします。

変更点
１．OpenWithListの有無でeditsetting.rscが作成したかどうか判定していた方式を別の方式に変更しました。
２．editsetting.rscによってShellが作成された場合のみShellキーの既存にEditを書き込む用に変更しました。
３．改修前のバージョンで作成したOpenWithListをアンインストール時に消去するようにしました。

了解しました。
内容を確認したいのですが、ちょっと最近時間が取れないので、しばらくお待ちいただければと思います。

時間が取れたので、ちょっと内容を確認させてもらいました。
（すいません。動作確認などは、まだできておらず、スクリプトコード自体も最後まで見られていません）

いくつか気になった点があったので質問させていただこうかと思います。


■ 7行目：URL = http://www011.upp.so-net.ne.jp/SinwaHamada

最後の「SinwaHamada」はディレクトリ名だと思いますので、
「http://www011.upp.so-net.ne.jp/SinwaHamada/」としておくと良いと思います。



■ 73行目：ArrayAdd(EraseTarget$[], …

前のバージョンでもそうだったみたいなのですが、[適用]ボタンを何度も押していると、:okラベルが何度も呼び出されるため、配列がどんどん増殖していくような動きをしそうに思えます。

まぁ、長さの無い配列を作れれば、そのための命令文をArrayAddを含むループの前に入れるのが解決策になるのですが、それがないのが、R-Scriptの欠点ですね... 他の手段でなんとかしないといけません。ArrayInit
時間に余裕があれば、R-Scriptの仕様補完もやっていきたいのですが…
ちょっと今のところ余裕がありません。すみません。
とりあえず、ループの最初の要素だけArrayInitかなんかを使っておいて、あとはArrayAddを使うなどの変則的な手段を使わないといけないかもしれません。



■ 76行目：KeyCount = sizeof(EraseTarget$[])

ここで改めて配列数を取り直さなくても良さそうな気がするのですが。
（見間違えだったらすいません）
１つ前の質問でも書いたArrayAddの影響もあって、sizeofで返却される値はどんどん増加していくことになるでしょうか。
それゆえに、配列のサイズを取り直しているということですか？

> ■ 73行目：ArrayAdd(EraseTarget$[], …
> ■ 76行目：KeyCount = sizeof(EraseTarget$[])

よく考えたら、

KeyCount = RegNumKey(OpenWithListKey$)
for(0, i<KeyCount) {
ArrayAdd(EraseTarget$[], ApplicationsKey$ + @"\" + EnumKey$(OpenWithListKey$, i))
}
// 削除を開始
KeyCount = sizeof(EraseTarget$[])

の部分は、

KeyCount = RegNumKey(OpenWithListKey$)
resize EraseTarget$[KeyCount]
for(0, i<KeyCount) {
EraseTarget$[i] = ApplicationsKey$ + @"\" + EnumKey$(OpenWithListKey$, i)
}

みたいな書き方で解決できそうです。

これから確保したい配列の上限数が分かっている場合、配列確保は一処理で行った方が良いので。
（R-Scriptに限ったことではないですが、配列の再確保・増加を繰り返し続けると、
　速度低下とメモリ断片化が発生しますので）

まず最初に４日間も返信が遅れたことをこの場をかりてお詫びします。

あとで気がついた間違っていた部分や重複する部分もそれにあわせて修正しました。

修正ありがとうございました。
これから確認したいと思いますが、完了までまた時間がかかりますので、またちょっとばっかりお待ちくださいませ。

差し替えを行いました。

開発用に使っていたメインＰＣが不調になったため、開発環境を先日購入した新ＰＣへ置き換えました。
開発〜公開への一連の流れのテストもかねて、本バージョンはβ版として公開しています。
お試しいただき、問題があればご報告いただければ幸いです。

問題なく動作しています。
差し替え、ありがとうございました。

ご確認ありがとうございました。
ある程度フィールドテストのための期間をおきましたら、正式公開としたいと思います。

本日、INASOFTの方で正式版を公開させていただきましたので、ご報告いたします。
今後ともよろしくお願いいたします。