diff --git a/components/cryptini/latest_stable/cryptini.lpk b/components/cryptini/latest_stable/cryptini.lpk
index e9cecc41e..9a860c2b5 100644
--- a/components/cryptini/latest_stable/cryptini.lpk
+++ b/components/cryptini/latest_stable/cryptini.lpk
@@ -80,7 +80,7 @@ Please update this versioninfo alongside the constant C_VERSION
   Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 
 "/>
-    <Version Minor="1" Release="2"/>
+    <Version Minor="1" Release="3"/>
     <Files Count="1">
       <Item1>
         <Filename Value="ucryptini.pas"/>
diff --git a/components/cryptini/latest_stable/demo/cryptinitest.lps b/components/cryptini/latest_stable/demo/cryptinitest.lps
index e127d0082..a65030c0f 100644
--- a/components/cryptini/latest_stable/demo/cryptinitest.lps
+++ b/components/cryptini/latest_stable/demo/cryptinitest.lps
@@ -3,14 +3,14 @@
   <ProjectSession>
     <PathDelim Value="\"/>
     <Version Value="10"/>
-    <BuildModes Active="Win32"/>
+    <BuildModes Active="Win64"/>
     <Units Count="51">
       <Unit0>
         <Filename Value="cryptinitest.lpr"/>
         <IsPartOfProject Value="True"/>
-        <EditorIndex Value="4"/>
+        <EditorIndex Value="2"/>
         <TopLine Value="6"/>
-        <CursorPos Y="49"/>
+        <CursorPos X="36" Y="30"/>
         <UsageCount Value="116"/>
         <Loaded Value="True"/>
       </Unit0>
@@ -20,6 +20,7 @@
         <ComponentName Value="mainform"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
+        <IsVisibleTab Value="True"/>
         <TopLine Value="197"/>
         <CursorPos X="41" Y="199"/>
         <UsageCount Value="116"/>
@@ -32,12 +33,10 @@
         <ComponentName Value="ShowINIForm"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <EditorIndex Value="3"/>
-        <TopLine Value="55"/>
+        <EditorIndex Value="-1"/>
+        <TopLine Value="50"/>
         <CursorPos X="3" Y="68"/>
         <UsageCount Value="108"/>
-        <Loaded Value="True"/>
-        <LoadedDesigner Value="True"/>
       </Unit2>
       <Unit3>
         <Filename Value="ukeydialog.pas"/>
@@ -45,12 +44,9 @@
         <ComponentName Value="keydialog"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <IsVisibleTab Value="True"/>
-        <EditorIndex Value="2"/>
+        <EditorIndex Value="-1"/>
         <CursorPos X="12" Y="29"/>
         <UsageCount Value="100"/>
-        <Loaded Value="True"/>
-        <LoadedDesigner Value="True"/>
       </Unit3>
       <Unit4>
         <Filename Value="uinputsectionvaluesform.pas"/>
@@ -402,99 +398,95 @@
         <Loaded Value="True"/>
       </Unit50>
     </Units>
-    <JumpHistory Count="23" HistoryIndex="22">
+    <JumpHistory Count="22" HistoryIndex="21">
       <Position1>
-        <Filename Value="ukeydialog.pas"/>
-        <Caret Line="29" Column="12"/>
+        <Filename Value="umainform.pas"/>
+        <Caret Line="621" Column="26" TopLine="607"/>
       </Position1>
       <Position2>
         <Filename Value="umainform.pas"/>
-        <Caret Line="621" Column="26" TopLine="607"/>
+        <Caret Line="621" Column="26"/>
       </Position2>
       <Position3>
         <Filename Value="umainform.pas"/>
-        <Caret Line="621" Column="26"/>
+        <Caret Line="20" Column="27" TopLine="3"/>
       </Position3>
       <Position4>
         <Filename Value="umainform.pas"/>
-        <Caret Line="20" Column="27" TopLine="3"/>
+        <Caret Line="32" Column="21"/>
       </Position4>
       <Position5>
         <Filename Value="umainform.pas"/>
-        <Caret Line="32" Column="21"/>
+        <Caret Line="185" Column="19" TopLine="155"/>
       </Position5>
       <Position6>
         <Filename Value="umainform.pas"/>
-        <Caret Line="185" Column="19" TopLine="155"/>
+        <Caret Line="32" Column="24" TopLine="18"/>
       </Position6>
       <Position7>
         <Filename Value="umainform.pas"/>
-        <Caret Line="32" Column="24" TopLine="18"/>
+        <Caret Line="234" Column="23" TopLine="222"/>
       </Position7>
       <Position8>
         <Filename Value="umainform.pas"/>
-        <Caret Line="234" Column="23" TopLine="222"/>
+        <Caret Line="185" TopLine="167"/>
       </Position8>
       <Position9>
         <Filename Value="umainform.pas"/>
-        <Caret Line="185" TopLine="167"/>
+        <Caret Line="184" TopLine="166"/>
       </Position9>
       <Position10>
         <Filename Value="umainform.pas"/>
-        <Caret Line="184" TopLine="166"/>
+        <Caret Line="183" TopLine="165"/>
       </Position10>
       <Position11>
         <Filename Value="umainform.pas"/>
-        <Caret Line="183" TopLine="165"/>
+        <Caret Line="270" Column="47" TopLine="241"/>
       </Position11>
       <Position12>
         <Filename Value="umainform.pas"/>
-        <Caret Line="270" Column="47" TopLine="241"/>
+        <Caret Line="933" Column="43" TopLine="99"/>
       </Position12>
       <Position13>
         <Filename Value="umainform.pas"/>
-        <Caret Line="933" Column="43" TopLine="99"/>
+        <Caret Line="191" Column="18" TopLine="179"/>
       </Position13>
       <Position14>
         <Filename Value="umainform.pas"/>
-        <Caret Line="191" Column="18" TopLine="179"/>
+        <Caret Line="153" Column="13" TopLine="153"/>
       </Position14>
       <Position15>
         <Filename Value="umainform.pas"/>
-        <Caret Line="153" Column="13" TopLine="153"/>
+        <Caret Line="385" Column="9" TopLine="371"/>
       </Position15>
       <Position16>
         <Filename Value="umainform.pas"/>
-        <Caret Line="385" Column="9" TopLine="371"/>
+        <Caret Line="11" Column="19"/>
       </Position16>
       <Position17>
         <Filename Value="umainform.pas"/>
-        <Caret Line="11" Column="19"/>
+        <Caret Line="153" Column="13" TopLine="140"/>
       </Position17>
       <Position18>
         <Filename Value="umainform.pas"/>
-        <Caret Line="153" Column="13" TopLine="140"/>
+        <Caret Line="395" TopLine="366"/>
       </Position18>
       <Position19>
         <Filename Value="umainform.pas"/>
-        <Caret Line="395" TopLine="366"/>
+        <Caret Line="154" Column="12" TopLine="125"/>
       </Position19>
       <Position20>
         <Filename Value="umainform.pas"/>
-        <Caret Line="154" Column="12" TopLine="125"/>
+        <Caret Line="153" Column="16" TopLine="127"/>
       </Position20>
       <Position21>
         <Filename Value="umainform.pas"/>
-        <Caret Line="153" Column="16" TopLine="127"/>
+        <Caret Line="163" TopLine="152"/>
       </Position21>
       <Position22>
-        <Filename Value="umainform.pas"/>
-        <Caret Line="163" TopLine="152"/>
-      </Position22>
-      <Position23>
         <Filename Value="umainform.pas"/>
         <Caret Line="116" Column="24" TopLine="116"/>
-      </Position23>
+      </Position22>
     </JumpHistory>
   </ProjectSession>
 </CONFIG>
diff --git a/components/cryptini/latest_stable/ucryptini.pas b/components/cryptini/latest_stable/ucryptini.pas
index d9f35c672..17af37483 100644
--- a/components/cryptini/latest_stable/ucryptini.pas
+++ b/components/cryptini/latest_stable/ucryptini.pas
@@ -15,7 +15,7 @@ unit ucryptini;
 
 { 'Paranoid' version of TIniFile
 
-  Copyright (C) 2016 Gordon Bamber minesadorada@gmail.com
+  Copyright (C) 2016 Gordon Bamber minesadorada@charcodelvcalle.com
   Base 64 code by David Barton
 
   This library is free software; you can redistribute it and/or modify it
@@ -219,7 +219,7 @@ const
     54, 55, 56, 57, 43, 47);
   {$ENDIF}
 
-C_VERSION = '0.1.2';
+C_VERSION = '0.1.3';
 {
   VERSION HISTORY
   ===============
@@ -236,7 +236,8 @@ C_VERSION = '0.1.2';
   V 0.1.2: Added thread-safe TLockCryptINIFile class
            for thread-safe operation (GB)
            Credit: "Fungus" at http://forum.lazarus.freepascal.org/
-  V 0.1.3: ??
+  V 0.1.3: BugFix: WriteIdent method without Version Info now covered by meaningful error message.
+  V 0.1.4: ??
 }
 type
   TCryptIniFile = class(TIniFile)
@@ -793,11 +794,15 @@ begin
     s:='0.0.0.0'; // Default
     VInfo:=TFileVersionInfo.Create(Application);
     TRY
-      VInfo.ReadFileInfo;
-      If fileinfo.GetProgramVersion(Version) then
-         s:=ProgramversionToStr(Version);
-    finally
-      VInfo.free;
+       TRY
+          VInfo.ReadFileInfo;
+          If fileinfo.GetProgramVersion(Version) then
+          s:=ProgramversionToStr(Version);
+       finally
+          VInfo.free;
+       end;
+    Except
+      Raise EResNotFound.Create('TCryptINIFile.WriteIdent' + LineEnding + 'Please include Version Info in Project/options to use this function');
     end;
     WriteString(IDENT_SECTION,IDENT_APPVERSION,s);
     WriteString(IDENT_SECTION, IDENT_EXE, ParamStrUTF8(0));
diff --git a/components/cryptini/latest_stable/updates/update_cryptini.json b/components/cryptini/latest_stable/updates/update_cryptini.json
index 66ef55f30..bd23edd84 100644
--- a/components/cryptini/latest_stable/updates/update_cryptini.json
+++ b/components/cryptini/latest_stable/updates/update_cryptini.json
@@ -7,7 +7,7 @@
   "UpdatePackageFiles" : [
     {
       "ForceNotify" : true,
-      "InternalVersion" : 4,
+      "InternalVersion" : 5,
       "Name" : "cryptini.lpk",
       "Version" : "0.1.2.0"
     }