diff --git a/CustomMenu.dproj b/CustomMenu.dproj
index 6435cbd..48f9daf 100644
--- a/CustomMenu.dproj
+++ b/CustomMenu.dproj
@@ -140,11 +140,11 @@
UNICODE;$(DCC_Define)
0
9
- CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=0.9.3.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=0.9.3.0;Comments=
+ CompanyName=;FileDescription=$(MSBuildProjectName);FileVersion=0.9.4.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProgramID=com.embarcadero.$(MSBuildProjectName);ProductName=$(MSBuildProjectName);ProductVersion=0.9.4.0;Comments=
- 3
+ 4
@@ -207,6 +207,12 @@ $(PostBuildEvent)]]>
true
+
+
+ CustomMenu.exe
+ true
+
+
Assets\
@@ -214,12 +220,6 @@ $(PostBuildEvent)]]>
true
-
-
- CustomMenu.exe
- true
-
-
CustomMenu.exe
diff --git a/CustomMenu.res b/CustomMenu.res
index 8efb3ce..95742a7 100644
Binary files a/CustomMenu.res and b/CustomMenu.res differ
diff --git a/FormCustomMenu.pas b/FormCustomMenu.pas
index 361fe26..7f6395d 100644
--- a/FormCustomMenu.pas
+++ b/FormCustomMenu.pas
@@ -312,7 +312,7 @@ function buildMenuFromINI(iniFilePath: string; itemData: TList; subMe
end;
begin
- case GREFRESH of TRUE: iniFile := NIL; end; // user did Alt-RightClick on desktop to force reload of the ini file
+ case GREFRESH and (iniFile <> NIL) of TRUE: begin iniFile.free; iniFile := NIL; end;end; // user did Alt-RightClick on desktop to force reload of the ini file
case (iniFile = NIL) and (not fileExists(iniFilePath)) of TRUE: begin result := FALSE; EXIT; end;end;
case iniFile = NIL of TRUE: iniFile := TStringList.create; end;
subMenuName := lowerCase(subMenuName); // so that subMenuName comparison isn't case sensitive