[Setup]
; \8dX\90V\81E\92Ç\89Á\83C\83\93\83X\83g\81[\83\8b\82Ì\82½\82ß\82Ì\8e¯\95Ê\96¼
; (\93¯\88ê\96¼\82Å\82 \82ê\82Î\8dX\90V\83C\83\93\83X\83g\81[\83\8b\81A\82»\82¤\82Å\82È\82¯\82ê\82Î\92Ç\89Á\83C\83\93\83X\83g\81[\83\8b\82Æ\82È\82é.)
-AppId = SeraphyScriptDialog2.0
+AppId = SeraphyScriptDialog2.1
; \95\\8e¦\96¼
AppName = SeraphyScriptDialog
; \95\\8e¦\83o\81[\83W\83\87\83\93
-AppVersion = 2.0
+AppVersion = 2.1
; \8fo\97Í\96¼
OutputBaseFilename={#SetupSetting("AppName")}-{#SetupSetting("AppVersion")}_setup
; \83Z\83b\83g\83A\83b\83v\82Ì\83o\81[\83W\83\87\83\93\8fî\95ñ
VersionInfoCompany = seraphyware.jp
-VersionInfoCopyright = copyright 2002/2 - 2015/3 seraphy (seraphyware.jp)
+VersionInfoCopyright = copyright 2002/2 - 2015/7 seraphy (seraphyware.jp)
VersionInfoDescription = SeraphyScriptDialog (DLL) Installer (x64/x86)
-VersionInfoVersion = 2.0.0.1
+VersionInfoVersion = 2.1.0.2
; \83v\83\8d\83O\83\89\83\80\83O\83\8b\81[\83v
DefaultGroupName = SeraphyScriptDialog
[Registry]
; COM\82Ü\82í\82è\82Ì\83o\81[\83W\83\87\83\93\8cÅ\97L\8e¯\95Ê\8eq
#define REP_PROGID "SeraphyScriptDialog"
-#define PROGID "SeraphyScriptDialog.2"
-#define PROG_VERSION "2"
-#define PROGID_VERSION "2.0"
-#define CLSID "{{4019FCE4-1A3B-4BFF-BF84-C036195842EF}"
-#define TYPLIBID "{{8C5ED098-A33E-4B09-8E44-638CCF6307A8}"
-#define APPID "{{C781EBBC-836D-4DB3-B100-16A2BEE5F503}"
+#define PROGID "SeraphyScriptDialog.2.1"
+#define PROGID_VERSION "2.1"
+#define CLSID "{{B7073E21-D520-470D-B53D-A36DA9D8DF0D}"
+#define TYPLIBID "{{F7875AF7-6FF0-4C54-93CA-7E897A3B4AD4}"
+#define APPID "{{B773A858-25DB-438E-BAF4-54EA91EAE9F7}"
; <<COM\82Ì\93o\98^>>
; "regserver" flag\82Í\8eg\97p\82¹\82¸\81A\83Z\83b\83g\83A\83b\83v\92\86\82Å\93Æ\8e©\82É\91Î\89\9e\82·\82é.
// \82È\82¯\82ê\82ÎFalse\82ð\95Ô\82·.
function GetLastVersion(var curver: String): Boolean;
var
- key, clsid, clsidEsc, verstr: String;
- pt: Integer;
+ key, clsid, clsidEsc: String;
begin
clsid := ExpandConstant('{reg:HKLM\SOFTWARE\Classes\' +
ExpandConstant('{#REP_PROGID}') + '\CLSID,}');
// \82±\82Ì\83o\81[\83W\83\87\83\93\82ª\94F\8e¯\82µ\82Ä\82¢\82é\81A\89ß\8b\8e\82ÌPROGID\97p\83o\81[\83W\83\87\83\93\82ð\90V\82µ\82¢\8f\87\82É\92è\8b`\82·\82é.
// (\96¢\97\88\82Ì\83o\81[\83W\83\87\83\93\82Í\95s\96¾\82È\82½\82ß\8c\9f\8dõ\82Å\82«\82È\82¢)
progVersions := TStringList.Create;
+ progVersions.Append('2');
progVersions.Append('1');
// \83\8c\83W\83X\83g\83\8a\82É\93o\98^\82ª\82 \82é\82©\8f\87\94Ô\82É\8c\9f\8d¸\82·\82é