SeraphyScriptTools v1.1以降のソースコード管理
| Revision | 590f160d0b6ba3dd0ca9c915c984586d731d3db0 (tree) |
|---|---|
| Time | 2015-09-06 23:46:09 |
| Author | seraphy <seraphy@sera...> |
| Commiter | seraphy |
セットアップの追加、ヘルプの修正
| @@ -1,10 +1,8 @@ | ||
| 1 | 1 | /Debug |
| 2 | 2 | /ipch |
| 3 | -/MBCSDebug | |
| 4 | -/MBCSRelease | |
| 5 | -/UnicodeDebug | |
| 6 | -/UnicodeRelease | |
| 7 | 3 | /x64 |
| 4 | +/Win32 | |
| 5 | +/dist | |
| 8 | 6 | SeraphyScriptTools.sdf |
| 9 | 7 | dlldata.c |
| 10 | 8 | SeraphyScriptTools.tlb |
| @@ -39,6 +39,7 @@ function MM_swapImage() { //v3.0 | ||
| 39 | 39 | <hr> |
| 40 | 40 | <p><img src="obj.gif" width="160" height="33"></p> |
| 41 | 41 | <p>自動拡張する一次元配列オブジェクトです。</p> |
| 42 | +<p><font color="red">※ Version1.2.0.2以降、格納される値はByValに強制されるようになりました。</font>(従来はByRefの値を、そのまま格納していました。)</p> | |
| 42 | 43 | <h3><img src="make.gif" width="160" height="33"></h3> |
| 43 | 44 | <h3><img src="prop.gif" width="160" height="33"></h3> |
| 44 | 45 | <h3>CreateVector</h3> |
| @@ -67,6 +68,7 @@ function MM_swapImage() { //v3.0 | ||
| 67 | 68 | <img src="met.gif" width="160" height="33"></p> |
| 68 | 69 | <hr> |
| 69 | 70 | <h1><a name="MAP"></a>ObjectMap 連想配列</h1> |
| 71 | +<p><font color="red">※ Version1.2.0.2以降、格納される値はByValに強制されるようになりました。</font>(従来はByRefの値を、そのまま格納していました。)</p> | |
| 70 | 72 | <hr> |
| 71 | 73 | <h1><img src="make.gif" width="160" height="33"></h1> |
| 72 | 74 | <h1><img src="obj.gif" width="160" height="33"></h1> |
| @@ -11,8 +11,8 @@ | ||
| 11 | 11 | |
| 12 | 12 | <h1 align="center"><img src="head.gif" alt="seraphyscripttoolsヘルプ" width="540" height="90"></h1> |
| 13 | 13 | <div align="right"> |
| 14 | - <p><b><font color="#0000CC">Version 1.0<br> | |
| 15 | - </font></b><b><font color="#0000CC">copyright(c) </font></b><b><font color="#0000CC">2001/1/21 | |
| 14 | + <p><b><font color="#0000CC">Version 1.2.0.2<br> | |
| 15 | + </font></b><b><font color="#0000CC">copyright(c) </font></b><b><font color="#0000CC">2015/9/6 | |
| 16 | 16 | </font></b><b><font color="#0000CC">seraphy<br> |
| 17 | 17 | </font></b></p> |
| 18 | 18 | </div> |
| @@ -26,63 +26,41 @@ | ||
| 26 | 26 | <li> フレーム上にベクターグラフィクスを描画したり印刷することができます。</li> |
| 27 | 27 | <li> 画像を表示したり印刷することができます</li> |
| 28 | 28 | </ul> |
| 29 | + | |
| 30 | +<p>※ 2002年にVer1.1を公開して以来、長らく更新していませんでしたが、2015年にSeraphyScriptToolsのx64/Unicode対応を行いました。</p> | |
| 31 | +<p>※ 基本的にはインターフェイスに変更はないためVer1.1と同じ使い方ができます。ただし、新しいXP以降のウィンドウスタイルに対応したことにより、画面サイズ等の調整が必要な部分がある可能性があります。</p> | |
| 32 | + | |
| 29 | 33 | <p> </p> |
| 30 | 34 | <h2><img src="env.gif" alt="動作環境" width="130" height="33"></h2> |
| 31 | -<p> SeraphyScriptToolsは、InternetExplorer5以降のスクリプトエンジンを利用を前提としています。<br> | |
| 32 | - また、スクリプトを実行するためにはWSHのインストールが必要です。<br> | |
| 33 | - WSHは、 Windows98、Windows2000以降には標準でインストールされています。<br> | |
| 34 | - NT4.0やWin95の場合はマイクロソフトのホームページからダウンロードしてください。</p> | |
| 35 | +<p> SeraphyScriptToolsは、Windows付属のスクリプトエンジンを利用を前提としています。<br> | |
| 36 | +<p> 以下のOSでの利用を想定しています。</p> | |
| 35 | 37 | <ul> |
| 36 | - <li> Windows95(InernetExplore5以降とWSHが必須)</li> | |
| 37 | - <li> WindowsNT4.0(SP4以降、IE5以降とWSHが必須)</li> | |
| 38 | - <li> Windows98</li> | |
| 39 | - <li> Windows2000</li> | |
| 38 | + <li>Windows Vista SP2以降 (32/64ビット) | |
| 39 | + <li>Windows 7 SP1以降 (32/64ビット) | |
| 40 | + <li>Windows 8.1 (32/64ビット) | |
| 41 | + <li>Windows 10 (32/64ビット) | |
| 40 | 42 | </ul> |
| 41 | -<p> Win9xでは、場合によってはDCOMのインストールが必要とされる場合もあります。</p> | |
| 42 | -<p> <b>《 推奨 》</b><br> | |
| 43 | - Internet Explorer5以降(スクリプトエンジンとDCOMのインストールが含まれています)</p> | |
| 44 | -<p><font size="-1" color="#666666">2001年1月現在、最新のスクリプトエンジンは下記よりダウンロードできます。<br> | |
| 45 | -<a href="http://www.microsoft.com/msdownload/vbscript/scripting.asp" target="_blank">http://www.microsoft.com/msdownload/vbscript/scripting.asp</a></font></p> | |
| 43 | +<p>※ 上記は想定であり、上記のすべての環境でテストしたわけではありません。(開発、テストは主にWindows8 x64で行っています。)</p> | |
| 46 | 44 | <p> </p> |
| 47 | 45 | <h2><img src="lc.gif" alt="使用許諾条件" width="130" height="33"></h2> |
| 48 | -<p> このソフトウェアはフリーウェアとし、どなたでも制限なくご利用いただけます。<br> | |
| 49 | - ただし、著作権はSeraphyにあり、無断で改変することはなりません。<br> | |
| 50 | - | |
| 51 | -このソフトウェアを利用した、いかなる結果についても作者および再配布者、紹介者は一切の責任を負わないものとします。<br> | |
| 52 | - あくまでも利用者自身の責任の範囲内においてご利用ください。<br> | |
| 53 | - ここでいう利用者とは、SeraphyScriptToolsを利用するスクリプトのエンドユーザーを含みます。<br> | |
| 54 | - SeraphyScriptToolsをエンドユーザー等、第3者に配布する場合には、配布者は、この使用許諾条件を説明しなければなりません。</p> | |
| 55 | -<p> 再配布する場合の形態についてはSeraphyScriptToolsの同一性を損なわない限り、メディアの種類やアーカイバの種類を問いません。<br> | |
| 56 | - 独自のインストーラを利用してかまいません。<br> | |
| 57 | - インストールに必須なのはSeraphyScriptTools本体とヘルプファイルを含む次の3つです。<br> | |
| 58 | - どのフォルダにコピーしても構いませんが、ProgramFiles\seraphyware\scrtolフォルダを推奨します。</p> | |
| 59 | -<ol> | |
| 60 | - <li>SeraphyScriptTools.DLL</li> | |
| 61 | - <li>SeraphyScriptTools.chm</li> | |
| 62 | - <li>SeraphyScriptTools.idx</li> | |
| 63 | -</ol> | |
| 64 | -<p><font color="#333333" size="-1"><img src="extrap.gif" width="20" height="24"> なお、バグ修正などはオブジェクトの上書きとなりますので、将来において、かならずしも同一性が保持されるとは限らないことを、あらかじめご了承ください。(オブジェクト構造が異なる新しいバージョンのリリースは、この限りではありません。)</font></p> | |
| 65 | -<p> Seraphyはバージョンアップ等のお知らせや情報をお知らせする、無料のメーリングリストに参加しています。<br> | |
| 66 | - メーリングリストに参加するにはベクター作者ページから<a href="http://hp.vector.co.jp/authors/VA017626/" target="_blank">セラフィーのページにアクセス</a>してください。<br> | |
| 67 | - また、最新情報などを、ここから取得することができます。<br> | |
| 68 | - なお、下記アドレスにて、バク情報、要望、ご意見などを投稿することができます。</p> | |
| 69 | -<p> <a href="mailto:seraphyware@freeml.com">mailto:seraphyware@freeml.com<br> | |
| 70 | -</a></p> | |
| 46 | +<p>ライセンスは、Apache License 2.0 準拠とします。</p> | |
| 47 | +<p><b>商用・非商用を問わず誰でも自由にご利用いただけます。</b></p> | |
| 48 | +<p><b><font color="red">本アプリケーションは完全に無保証です。本アプリケーションを使用した、いかなる結果についても作者および再配布者は責任を負いません。</font></b></p> | |
| 49 | +<p>最終利用者自身の責任の範囲においてご利用ください。</p> | |
| 50 | +<p></p> | |
| 51 | +<p>なお、本プログラムはCOMオブジェクトという性質の都合上、COMのバージョン管理等を行う必要があります。</p> | |
| 52 | +<p>もし、独自に改変したバージョンを作成する場合には、CLSID、PROGIDを変更し、競合が発生しないようにしてください。</p> | |
| 53 | + | |
| 71 | 54 | <p><img src="is.gif" alt="インストール" width="130" height="33"></p> |
| 72 | -<p> インストーラは付属していません。<br> | |
| 73 | - 解凍されたファイルをフォルダごと任意のディレクトリにコピーしたあと、regsvr32.exeを使って、SeraphyScriptTools.DLLに自己登録させてください。</p> | |
| 74 | -<p><font size="-1" color="#006633"> 例)<br> | |
| 75 | - <b>regsvr32.exe "c:\progra~1\seraphy\scrtol\seraphyscripttools.dll"</b><br> | |
| 76 | -<br> | |
| 77 | - ただしく登録された場合には、「DllRegisterServer in xxxxx | |
| 78 | -succeeded.」というメッセージが表示されます。</font><br> | |
| 79 | -</p> | |
| 80 | -<p><br> | |
| 81 | - 登録解除に対応しています。<br> | |
| 82 | - アンインストールはregsvr32.exe -uで登録解除してDLLを削除してください。<br> | |
| 83 | -</p> | |
| 55 | +<p>Version1.2.0.2以降ではInno Setupによるセットアッププログラムによるインストール、アンインストールとなっています。</p> | |
| 56 | +<p>64ビットOSの場合は、x64とx86版の両方が自動的にインストールされます。32ビットOSの場合はx86版のみがインストールされます。</p> | |
| 57 | +<p>アンインストールはコントロールパネルのプログラムから削除できます。</p> | |
| 58 | + | |
| 84 | 59 | <p> </p> |
| 85 | 60 | <h2><img src="hs.gif" alt="更新履歴" width="130" height="33"></h2> |
| 61 | +<p>2015/9/6 Version1.2.0.2 インストーラ対応、CLSID差し替え、フォルダダイアログのヒープエラーバグ修正等<br> | |
| 62 | +<p>2015/8/17 Version1.2.0.1 x64/x86両対応、MBCS/UNICODE両対応版のベータリリース<br> | |
| 63 | +<p>2002/10/9 Version1.1 軽微なバグ修正<br> | |
| 86 | 64 | <p>2001/1 Version1.0 公開<br> |
| 87 | 65 | 2000/9 Version1.0ベータ・リリース</p> |
| 88 | 66 | <p> </p> |
| @@ -4,10 +4,10 @@ | ||
| 4 | 4 | |
| 5 | 5 | |
| 6 | 6 | /* File created by MIDL compiler version 8.00.0603 */ |
| 7 | -/* at Sun Sep 06 22:12:15 2015 | |
| 7 | +/* at Sun Sep 06 23:11:30 2015 | |
| 8 | 8 | */ |
| 9 | 9 | /* Compiler settings for SeraphyScriptTools.idl: |
| 10 | - Oicf, W1, Zp8, env=Win64 (32b run), target_arch=AMD64 8.00.0603 | |
| 10 | + Oicf, W1, Zp8, env=Win32 (32b run), target_arch=X86 8.00.0603 | |
| 11 | 11 | protocol : dce , ms_ext, c_ext, robust |
| 12 | 12 | error checks: allocation ref bounds_check enum stub_data |
| 13 | 13 | VC __declspec() decoration level: |
| @@ -93,8 +93,8 @@ END | ||
| 93 | 93 | // |
| 94 | 94 | |
| 95 | 95 | VS_VERSION_INFO VERSIONINFO |
| 96 | - FILEVERSION 1,2,0,1 | |
| 97 | - PRODUCTVERSION 1,2,0,1 | |
| 96 | + FILEVERSION 1,2,0,2 | |
| 97 | + PRODUCTVERSION 1,2,0,2 | |
| 98 | 98 | FILEFLAGSMASK 0x3fL |
| 99 | 99 | #ifdef _DEBUG |
| 100 | 100 | FILEFLAGS 0x1L |
| @@ -110,12 +110,12 @@ BEGIN | ||
| 110 | 110 | BLOCK "041104b0" |
| 111 | 111 | BEGIN |
| 112 | 112 | VALUE "FileDescription", "SeraphyScriptTools Module" |
| 113 | - VALUE "FileVersion", "1.2.0.1" | |
| 113 | + VALUE "FileVersion", "1.2.0.2" | |
| 114 | 114 | VALUE "InternalName", "SeraphyScriptTools" |
| 115 | 115 | VALUE "LegalCopyright", "Copyright seraphyware.jp 2000, 2015" |
| 116 | 116 | VALUE "OriginalFilename", "SeraphyScriptTools.DLL" |
| 117 | 117 | VALUE "ProductName", "SeraphyScriptTools Module" |
| 118 | - VALUE "ProductVersion", "1.2.0.1" | |
| 118 | + VALUE "ProductVersion", "1.2.0.2" | |
| 119 | 119 | END |
| 120 | 120 | END |
| 121 | 121 | BLOCK "VarFileInfo" |
| @@ -122,9 +122,12 @@ | ||
| 122 | 122 | </PropertyGroup> |
| 123 | 123 | <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='UnicodeRelease|Win32'"> |
| 124 | 124 | <LinkIncremental>false</LinkIncremental> |
| 125 | + <IntDir>$(Platform)\$(Configuration)\</IntDir> | |
| 126 | + <OutDir>$(SolutionDir)$(Platform)\$(Configuration)\</OutDir> | |
| 125 | 127 | </PropertyGroup> |
| 126 | 128 | <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='MBCSRelease|Win32'"> |
| 127 | 129 | <LinkIncremental>false</LinkIncremental> |
| 130 | + <IntDir>$(Platform)\$(Configuration)\</IntDir> | |
| 128 | 131 | </PropertyGroup> |
| 129 | 132 | <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='UnicodeRelease|x64'"> |
| 130 | 133 | <LinkIncremental>false</LinkIncremental> |
| @@ -134,9 +137,12 @@ | ||
| 134 | 137 | </PropertyGroup> |
| 135 | 138 | <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='UnicodeDebug|Win32'"> |
| 136 | 139 | <LinkIncremental>true</LinkIncremental> |
| 140 | + <IntDir>$(Platform)\$(Configuration)\</IntDir> | |
| 141 | + <OutDir>$(SolutionDir)$(Platform)\$(Configuration)\</OutDir> | |
| 137 | 142 | </PropertyGroup> |
| 138 | 143 | <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='MBCSDebug|Win32'"> |
| 139 | 144 | <LinkIncremental>true</LinkIncremental> |
| 145 | + <IntDir>$(Platform)\$(Configuration)\</IntDir> | |
| 140 | 146 | </PropertyGroup> |
| 141 | 147 | <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='UnicodeDebug|x64'"> |
| 142 | 148 | <LinkIncremental>true</LinkIncremental> |
| @@ -204,6 +210,7 @@ | ||
| 204 | 210 | <SubSystem>Windows</SubSystem> |
| 205 | 211 | <GenerateDebugInformation>false</GenerateDebugInformation> |
| 206 | 212 | <ModuleDefinitionFile>SeraphyScriptTools.def</ModuleDefinitionFile> |
| 213 | + <OutputFile>$(OutDir)$(TargetName)x64$(TargetExt)</OutputFile> | |
| 207 | 214 | </Link> |
| 208 | 215 | <Midl> |
| 209 | 216 | <TypeLibraryName>.\ReleaseUMinDependency/SeraphyScriptTools.tlb</TypeLibraryName> |
| @@ -225,6 +232,7 @@ | ||
| 225 | 232 | <SubSystem>Windows</SubSystem> |
| 226 | 233 | <GenerateDebugInformation>false</GenerateDebugInformation> |
| 227 | 234 | <ModuleDefinitionFile>SeraphyScriptTools.def</ModuleDefinitionFile> |
| 235 | + <OutputFile>$(OutDir)$(TargetName)x64$(TargetExt)</OutputFile> | |
| 228 | 236 | </Link> |
| 229 | 237 | <Midl> |
| 230 | 238 | <TypeLibraryName>.\ReleaseUMinDependency/SeraphyScriptTools.tlb</TypeLibraryName> |
| @@ -292,6 +300,7 @@ | ||
| 292 | 300 | <GenerateDebugInformation>true</GenerateDebugInformation> |
| 293 | 301 | <SubSystem>Windows</SubSystem> |
| 294 | 302 | <ModuleDefinitionFile>SeraphyScriptTools.def</ModuleDefinitionFile> |
| 303 | + <OutputFile>$(OutDir)$(TargetName)x64$(TargetExt)</OutputFile> | |
| 295 | 304 | </Link> |
| 296 | 305 | <Midl> |
| 297 | 306 | <TypeLibraryName>.\DebugU/SeraphyScriptTools.tlb</TypeLibraryName> |
| @@ -314,6 +323,7 @@ | ||
| 314 | 323 | <GenerateDebugInformation>true</GenerateDebugInformation> |
| 315 | 324 | <SubSystem>Windows</SubSystem> |
| 316 | 325 | <ModuleDefinitionFile>SeraphyScriptTools.def</ModuleDefinitionFile> |
| 326 | + <OutputFile>$(OutDir)$(TargetName)x64$(TargetExt)</OutputFile> | |
| 317 | 327 | </Link> |
| 318 | 328 | <Midl> |
| 319 | 329 | <TypeLibraryName>.\DebugU/SeraphyScriptTools.tlb</TypeLibraryName> |
| @@ -0,0 +1,195 @@ | ||
| 1 | +[Setup] | |
| 2 | +; 更新・追加インストールのための識別名 | |
| 3 | +; (同一名であれば更新インストール、そうでなければ追加インストールとなる.) | |
| 4 | +AppId = SeraphyScriptTools1.2 | |
| 5 | + | |
| 6 | +; 表示名 | |
| 7 | +AppName = SeraphyScriptTools | |
| 8 | +; 表示バージョン | |
| 9 | +AppVersion = 1.2 | |
| 10 | + | |
| 11 | +; 出力名 | |
| 12 | +OutputBaseFilename={#SetupSetting("AppName")}-{#SetupSetting("AppVersion")}_setup | |
| 13 | +; 出力先ディレクトリ | |
| 14 | +OutputDir=dist | |
| 15 | + | |
| 16 | +; 表示する配布者名 | |
| 17 | +AppPublisher=seraphyware.jp | |
| 18 | +; 著作権表示 | |
| 19 | +AppCopyright=Copyright 2015 seraphy (seraphyware.jp) | |
| 20 | + | |
| 21 | +; セットアップのバージョン情報 | |
| 22 | +VersionInfoCompany = seraphyware.jp | |
| 23 | +VersionInfoCopyright = copyright 2001/1 - 2015/9 seraphy (seraphyware.jp) | |
| 24 | +VersionInfoDescription = SeraphyScriptTools (DLL) Installer (x64/x86) | |
| 25 | +VersionInfoVersion = 1.2.0.2 | |
| 26 | + | |
| 27 | +; プログラムグループ | |
| 28 | +DefaultGroupName = SeraphyScriptTools | |
| 29 | + | |
| 30 | +; プログラムグループの不作成を可とする | |
| 31 | +AllowNoIcons=yes | |
| 32 | + | |
| 33 | + | |
| 34 | +; 常にcommonに入れるのでインストール先を問い合わせない. | |
| 35 | +DisableDirPage = yes | |
| 36 | + | |
| 37 | + | |
| 38 | +; デフォルトのインストール先の指定 | |
| 39 | +; (インストール先はアンインストーラが保存される場所でもある) | |
| 40 | +DefaultDirName={cf}\{#SetupSetting("AppName")}\{#SetupSetting("AppVersion")} | |
| 41 | + | |
| 42 | + | |
| 43 | +; 64bitはx64アーキテクチャを想定 | |
| 44 | +ArchitecturesInstallIn64BitMode = x64 | |
| 45 | + | |
| 46 | +; 日本語・英語のいずれでもない場合のみ言語選択画面を出す. | |
| 47 | +ShowLanguageDialog = auto | |
| 48 | + | |
| 49 | +; 圧縮形式 | |
| 50 | +Compression=lzma2/max | |
| 51 | +SolidCompression=yes | |
| 52 | + | |
| 53 | + | |
| 54 | +[Languages] | |
| 55 | +Name: "ja"; MessagesFile: "compiler:Languages/Japanese.isl"; | |
| 56 | +Name: "en"; MessagesFile: "compiler:Default.isl"; | |
| 57 | + | |
| 58 | +[Types] | |
| 59 | +Name: "Minimum"; Description: "{cm:MinInst}"; | |
| 60 | +Name: "Full"; Description: "{cm:FullInst}"; | |
| 61 | +Name: "Custom"; Description: "{cm:CustomInst}"; Flags: iscustom; | |
| 62 | + | |
| 63 | +[Components] | |
| 64 | +Name: "CoreDLL"; Description: "Core DLL"; Types: Minimum Full Custom; Flags: fixed | |
| 65 | +Name: "Help"; Description: "Help"; Types: Full Custom; | |
| 66 | +Name: "Samples"; Description: "Samples"; Types: Full Custom; | |
| 67 | + | |
| 68 | +[Files] | |
| 69 | +#define DLL_NAME_X64 "SeraphyScriptToolsx64.dll" | |
| 70 | +#define DLL_NAME_X86 "SeraphyScriptTools.dll" | |
| 71 | + | |
| 72 | +; 64ビット版dll | |
| 73 | +Source: "x64\UnicodeRelease\{#DLL_NAME_X64}"; DestDir: "{code:GetTargetDir}"; Flags: regserver 64bit; MinVersion: 0,5.01sp3; Check: Is64BitInstallMode; Components: "CoreDLL"; | |
| 74 | + | |
| 75 | +; 32ビット版dll | |
| 76 | +Source: "Win32\UnicodeRelease\{#DLL_NAME_X86}"; DestDir: "{code:GetTargetDirX86}"; Flags: regserver 32bit; MinVersion: 0,5.01sp3; Components: "CoreDLL"; | |
| 77 | + | |
| 78 | +; ヘルプ | |
| 79 | +Source: "Help/seraphyscripttools.chm"; DestDir: "{code:GetTargetDir}/Help"; Flags: isreadme; Components: "Help"; | |
| 80 | + | |
| 81 | +; サンプル | |
| 82 | +Source: "TestScript/*"; DestDir: "{code:GetTargetDir}/Samples"; Components: "Samples"; | |
| 83 | + | |
| 84 | +[Icons] | |
| 85 | +; ヘルプ | |
| 86 | +Name: "{group}\Help"; Filename: "{code:GetTargetDir}\Help\seraphyscripttools.chm"; WorkingDir: "{code:GetTargetDir}\Help\"; Components: "Help"; | |
| 87 | + | |
| 88 | +; サンプル | |
| 89 | +Name: "{group}\Samples\form1.vbs"; Filename: "{code:GetTargetDir}\Samples\form1.vbs"; WorkingDir: "{code:GetTargetDir}\Samples\"; Components: "Samples"; | |
| 90 | +Name: "{group}\Samples\form2.vbs"; Filename: "{code:GetTargetDir}\Samples\form2.vbs"; WorkingDir: "{code:GetTargetDir}\Samples\"; Components: "Samples"; | |
| 91 | +Name: "{group}\Samples\form3.vbs"; Filename: "{code:GetTargetDir}\Samples\form3.vbs"; WorkingDir: "{code:GetTargetDir}\Samples\"; Components: "Samples"; | |
| 92 | +Name: "{group}\Samples\bitmap.vbs"; Filename: "{code:GetTargetDir}\Samples\bitmap.vbs"; WorkingDir: "{code:GetTargetDir}\Samples\"; Components: "Samples"; | |
| 93 | +Name: "{group}\Samples\draw1.vbs"; Filename: "{code:GetTargetDir}\Samples\draw1.vbs"; WorkingDir: "{code:GetTargetDir}\Samples\"; Components: "Samples"; | |
| 94 | +Name: "{group}\Samples\event1.vbs"; Filename: "{code:GetTargetDir}\Samples\event1.vbs"; WorkingDir: "{code:GetTargetDir}\Samples\"; Components: "Samples"; | |
| 95 | +Name: "{group}\Samples\tree_list.vbs"; Filename: "{code:GetTargetDir}\Samples\tree_list.vbs"; WorkingDir: "{code:GetTargetDir}\Samples\"; Components: "Samples"; | |
| 96 | + | |
| 97 | + | |
| 98 | +[CustomMessages] | |
| 99 | +en.x86_x64=Install both x86 and x64 version. | |
| 100 | +ja.x86_x64=x86版とx64版の両方がインストールされます. | |
| 101 | + | |
| 102 | +en.x86=Install x86 version. | |
| 103 | +ja.x86=x86版がインストールされます. | |
| 104 | + | |
| 105 | +en.MinInst=Minimum | |
| 106 | +ja.MinInst=最小構成 | |
| 107 | + | |
| 108 | +en.FullInst=Full | |
| 109 | +ja.FullInst=完全 | |
| 110 | + | |
| 111 | +en.CustomInst=Custom | |
| 112 | +ja.CustomInst=カスタム | |
| 113 | + | |
| 114 | + | |
| 115 | +[Code] | |
| 116 | + | |
| 117 | +// 64ビット版のインストール先 | |
| 118 | +// (32ビットモードの場合は32ビット版と同じ場所を指す.) | |
| 119 | +function GetTargetDir(value: String): String; | |
| 120 | +var | |
| 121 | + vartmp: String; | |
| 122 | +begin | |
| 123 | + if Is64BitInstallMode then begin | |
| 124 | + vartmp := '{cf64}'; | |
| 125 | + end else begin | |
| 126 | + vartmp := '{cf}'; | |
| 127 | + end; | |
| 128 | + Result := ExpandConstant(vartmp +'\{#SetupSetting("AppName")}\{#SetupSetting("AppVersion")}'); | |
| 129 | +end; | |
| 130 | + | |
| 131 | +// 32ビット版のインストール先 | |
| 132 | +function GetTargetDirX86(value: String): String; | |
| 133 | +begin | |
| 134 | + Result := ExpandConstant('{cf32}\{#SetupSetting("AppName")}\{#SetupSetting("AppVersion")}'); | |
| 135 | +end; | |
| 136 | + | |
| 137 | +// インストール先の表示 | |
| 138 | +function UpdateReadyMemo(Space, NewLine, MemoUserInfoInfo, MemoDirInfo, | |
| 139 | + MemoTypeInfo, MemoComponentsInfo, MemoGroupInfo, MemoTasksInfo: String): String; | |
| 140 | +begin | |
| 141 | + // インストールモード (x64/x86 or x86) | |
| 142 | + if Is64BitInstallMode then begin | |
| 143 | + Result := Result + ExpandConstant('{cm:x86_x64}') + NewLine; | |
| 144 | + end else begin | |
| 145 | + Result := Result + ExpandConstant('{cm:x86}') + NewLine; | |
| 146 | + end; | |
| 147 | + | |
| 148 | + Result := Result + NewLine; | |
| 149 | + | |
| 150 | + // インストール先の表示 | |
| 151 | + Result := Result + 'Install directory:' + NewLine; | |
| 152 | + if Is64BitInstallMode then begin | |
| 153 | + // x64/x86ごとに | |
| 154 | + Result := Result + Space + ExpandConstant('x64 = {code:GetTargetDir}') + NewLine; | |
| 155 | + Result := Result + Space + ExpandConstant('x86 = {code:GetTargetDirX86}') + NewLine; | |
| 156 | + end else begin | |
| 157 | + // x86のみ | |
| 158 | + Result := Result + Space + ExpandConstant('{code:GetTargetDirX86}') + NewLine; | |
| 159 | + end; | |
| 160 | + | |
| 161 | + // ヘルプファイルのインストール先 | |
| 162 | + if IsComponentSelected('Help') then begin | |
| 163 | + Result := Result + NewLine; | |
| 164 | + Result := Result + 'Help directory:' + NewLine; | |
| 165 | + Result := Result + Space + ExpandConstant('{code:GetTargetDir}\Help') + NewLine; | |
| 166 | + end; | |
| 167 | + | |
| 168 | + // サンプルのインストール先 | |
| 169 | + if IsComponentSelected('Samples') then begin | |
| 170 | + Result := Result + NewLine; | |
| 171 | + Result := Result + 'Samples directory:' + NewLine; | |
| 172 | + Result := Result + Space + ExpandConstant('{code:GetTargetDir}\Samples') + NewLine; | |
| 173 | + end; | |
| 174 | +end; | |
| 175 | + | |
| 176 | +// ページスキップの判定 | |
| 177 | +function ShouldSkipPage(PageID: Integer): Boolean; | |
| 178 | +begin | |
| 179 | + if PageID = wpSelectProgramGroup then begin | |
| 180 | + // Help, Samplesともに選択していない場合はスタートメニューを作成しないので問い合わせ不要 | |
| 181 | + Result := not IsComponentSelected('Help') and not IsComponentSelected('Samples'); | |
| 182 | + Exit; | |
| 183 | + end; | |
| 184 | + Result := False; | |
| 185 | +end; | |
| 186 | + | |
| 187 | +// インストール開始、終了などのステップで呼び出される | |
| 188 | +procedure CurStepChanged(CurStep: TSetupStep); | |
| 189 | +begin | |
| 190 | + Log('CurStepChanged(' + IntToStr(Ord(CurStep)) + ') called'); | |
| 191 | + | |
| 192 | + if CurStep = ssPostInstall then begin | |
| 193 | + end; | |
| 194 | +end; | |
| 195 | + |