• R/O
  • HTTP
  • SSH
  • HTTPS

SeraphyScriptTools: Commit

SeraphyScriptTools v1.1以降のソースコード管理


Commit MetaInfo

Revision590f160d0b6ba3dd0ca9c915c984586d731d3db0 (tree)
Time2015-09-06 23:46:09
Authorseraphy <seraphy@sera...>
Commiterseraphy

Log Message

セットアップの追加、ヘルプの修正

Change Summary

Incremental Difference

--- a/.gitignore
+++ b/.gitignore
@@ -1,10 +1,8 @@
11 /Debug
22 /ipch
3-/MBCSDebug
4-/MBCSRelease
5-/UnicodeDebug
6-/UnicodeRelease
73 /x64
4+/Win32
5+/dist
86 SeraphyScriptTools.sdf
97 dlldata.c
108 SeraphyScriptTools.tlb
--- a/Help/objvector.htm
+++ b/Help/objvector.htm
@@ -39,6 +39,7 @@ function MM_swapImage() { //v3.0
3939 <hr>
4040 <p><img src="obj.gif" width="160" height="33"></p>
4141 <p>自動拡張する一次元配列オブジェクトです。</p>
42+<p><font color="red">※ Version1.2.0.2以降、格納される値はByValに強制されるようになりました。</font>(従来はByRefの値を、そのまま格納していました。)</p>
4243 <h3><img src="make.gif" width="160" height="33"></h3>
4344 <h3><img src="prop.gif" width="160" height="33"></h3>
4445 <h3>CreateVector</h3>
@@ -67,6 +68,7 @@ function MM_swapImage() { //v3.0
6768 <img src="met.gif" width="160" height="33"></p>
6869 <hr>
6970 <h1><a name="MAP"></a>ObjectMap 連想配列</h1>
71+<p><font color="red">※ Version1.2.0.2以降、格納される値はByValに強制されるようになりました。</font>(従来はByRefの値を、そのまま格納していました。)</p>
7072 <hr>
7173 <h1><img src="make.gif" width="160" height="33"></h1>
7274 <h1><img src="obj.gif" width="160" height="33"></h1>
--- a/Help/top.htm
+++ b/Help/top.htm
@@ -11,8 +11,8 @@
1111
1212 <h1 align="center"><img src="head.gif" alt="seraphyscripttoolsヘルプ" width="540" height="90"></h1>
1313 <div align="right">
14- <p><b><font color="#0000CC">Version 1.0<br>
15- </font></b><b><font color="#0000CC">copyright(c)&nbsp; </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)&nbsp; </font></b><b><font color="#0000CC">2015/9/6
1616 </font></b><b><font color="#0000CC">seraphy<br>
1717 </font></b></p>
1818 </div>
@@ -26,63 +26,41 @@
2626 <li> フレーム上にベクターグラフィクスを描画したり印刷することができます。</li>
2727 <li> 画像を表示したり印刷することができます</li>
2828 </ul>
29+
30+<p>※ 2002年にVer1.1を公開して以来、長らく更新していませんでしたが、2015年にSeraphyScriptToolsのx64/Unicode対応を行いました。</p>
31+<p>※ 基本的にはインターフェイスに変更はないためVer1.1と同じ使い方ができます。ただし、新しいXP以降のウィンドウスタイルに対応したことにより、画面サイズ等の調整が必要な部分がある可能性があります。</p>
32+
2933 <p> </p>
3034 <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>
3537 <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ビット)
4042 </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>
4644 <p> </p>
4745 <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>&nbsp; <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+
7154 <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 &quot;c:\progra~1\seraphy\scrtol\seraphyscripttools.dll&quot;</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+
8459 <p> </p>
8560 <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>
8664 <p>2001/1 Version1.0 公開<br>
8765 2000/9 Version1.0ベータ・リリース</p>
8866 <p> </p>
--- a/SeraphyScriptTools.h
+++ b/SeraphyScriptTools.h
@@ -4,10 +4,10 @@
44
55
66 /* 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
88 */
99 /* 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
1111 protocol : dce , ms_ext, c_ext, robust
1212 error checks: allocation ref bounds_check enum stub_data
1313 VC __declspec() decoration level:
--- a/SeraphyScriptTools.rc
+++ b/SeraphyScriptTools.rc
@@ -93,8 +93,8 @@ END
9393 //
9494
9595 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
9898 FILEFLAGSMASK 0x3fL
9999 #ifdef _DEBUG
100100 FILEFLAGS 0x1L
@@ -110,12 +110,12 @@ BEGIN
110110 BLOCK "041104b0"
111111 BEGIN
112112 VALUE "FileDescription", "SeraphyScriptTools Module"
113- VALUE "FileVersion", "1.2.0.1"
113+ VALUE "FileVersion", "1.2.0.2"
114114 VALUE "InternalName", "SeraphyScriptTools"
115115 VALUE "LegalCopyright", "Copyright seraphyware.jp 2000, 2015"
116116 VALUE "OriginalFilename", "SeraphyScriptTools.DLL"
117117 VALUE "ProductName", "SeraphyScriptTools Module"
118- VALUE "ProductVersion", "1.2.0.1"
118+ VALUE "ProductVersion", "1.2.0.2"
119119 END
120120 END
121121 BLOCK "VarFileInfo"
--- a/SeraphyScriptTools.vcxproj
+++ b/SeraphyScriptTools.vcxproj
@@ -122,9 +122,12 @@
122122 </PropertyGroup>
123123 <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='UnicodeRelease|Win32'">
124124 <LinkIncremental>false</LinkIncremental>
125+ <IntDir>$(Platform)\$(Configuration)\</IntDir>
126+ <OutDir>$(SolutionDir)$(Platform)\$(Configuration)\</OutDir>
125127 </PropertyGroup>
126128 <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='MBCSRelease|Win32'">
127129 <LinkIncremental>false</LinkIncremental>
130+ <IntDir>$(Platform)\$(Configuration)\</IntDir>
128131 </PropertyGroup>
129132 <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='UnicodeRelease|x64'">
130133 <LinkIncremental>false</LinkIncremental>
@@ -134,9 +137,12 @@
134137 </PropertyGroup>
135138 <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='UnicodeDebug|Win32'">
136139 <LinkIncremental>true</LinkIncremental>
140+ <IntDir>$(Platform)\$(Configuration)\</IntDir>
141+ <OutDir>$(SolutionDir)$(Platform)\$(Configuration)\</OutDir>
137142 </PropertyGroup>
138143 <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='MBCSDebug|Win32'">
139144 <LinkIncremental>true</LinkIncremental>
145+ <IntDir>$(Platform)\$(Configuration)\</IntDir>
140146 </PropertyGroup>
141147 <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='UnicodeDebug|x64'">
142148 <LinkIncremental>true</LinkIncremental>
@@ -204,6 +210,7 @@
204210 <SubSystem>Windows</SubSystem>
205211 <GenerateDebugInformation>false</GenerateDebugInformation>
206212 <ModuleDefinitionFile>SeraphyScriptTools.def</ModuleDefinitionFile>
213+ <OutputFile>$(OutDir)$(TargetName)x64$(TargetExt)</OutputFile>
207214 </Link>
208215 <Midl>
209216 <TypeLibraryName>.\ReleaseUMinDependency/SeraphyScriptTools.tlb</TypeLibraryName>
@@ -225,6 +232,7 @@
225232 <SubSystem>Windows</SubSystem>
226233 <GenerateDebugInformation>false</GenerateDebugInformation>
227234 <ModuleDefinitionFile>SeraphyScriptTools.def</ModuleDefinitionFile>
235+ <OutputFile>$(OutDir)$(TargetName)x64$(TargetExt)</OutputFile>
228236 </Link>
229237 <Midl>
230238 <TypeLibraryName>.\ReleaseUMinDependency/SeraphyScriptTools.tlb</TypeLibraryName>
@@ -292,6 +300,7 @@
292300 <GenerateDebugInformation>true</GenerateDebugInformation>
293301 <SubSystem>Windows</SubSystem>
294302 <ModuleDefinitionFile>SeraphyScriptTools.def</ModuleDefinitionFile>
303+ <OutputFile>$(OutDir)$(TargetName)x64$(TargetExt)</OutputFile>
295304 </Link>
296305 <Midl>
297306 <TypeLibraryName>.\DebugU/SeraphyScriptTools.tlb</TypeLibraryName>
@@ -314,6 +323,7 @@
314323 <GenerateDebugInformation>true</GenerateDebugInformation>
315324 <SubSystem>Windows</SubSystem>
316325 <ModuleDefinitionFile>SeraphyScriptTools.def</ModuleDefinitionFile>
326+ <OutputFile>$(OutDir)$(TargetName)x64$(TargetExt)</OutputFile>
317327 </Link>
318328 <Midl>
319329 <TypeLibraryName>.\DebugU/SeraphyScriptTools.tlb</TypeLibraryName>
--- /dev/null
+++ b/SeraphyScriptToolsSetup.iss
@@ -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+
Show on old repository browser