Merge branch 'release/4.27.0'

Release v4.27.0

Author: delphidabbler

CHANGELOG.md

@@ -6,6 +6,14 @@ Releases are listed in reverse version number order.
 
 > Note that _CodeSnip_ v4 was developed in parallel with v3 for a while. As a consequence some v3 releases have later release dates than early v4 releases.
 
+## Release v4.27.0 of 12 September 2025
+
+* Added support for test compiling snippets with Delphi 13 Florence [issue #170].
+* Documentation changes re addition of support for Delphi 13:
+  * File format additions for config file, export files, user database and main database.
+  * `Docs/ReadMe-portable.txt` & `Docs/ReadMe-standard.txt`
+  * Relevant help topics.
+
 ## Release v4.26.0 of 02 May 2025
 
 * Updated the dialogue box displayed when saving units and annotated source code [issue #166]:

Docs/Design/FileFormats/config.html

@@ -262,6 +262,9 @@ <h4>
   <li>
     <em>D12Y</em> &ndash; Delphi 12 Athens
   </li>
+  <li>
+    <em>D13F</em> &ndash; Delphi 13 Florence
+  </li>
   <li>
     <em>FPC</em> &ndash; Free Pascal
   </li>
@@ -622,6 +625,12 @@ <h4>
   <dd>
     Indicates whether Delphi 12 Athens was included in the search.
   </dd>
+  <dt>
+    <code class="key">D13F</code> (Boolean)
+  </dt>
+  <dd>
+    Indicates whether Delphi 13 Florence was included in the search.
+  </dd>
   <dt>
     <code class="key">FPC</code> (Boolean)
   </dt>

Docs/Design/FileFormats/export.html

@@ -619,6 +619,9 @@ <h2>
           <li>
             <em>d12y</em> &ndash; Delphi 12 Athens compiler <span class="highlight">(v7.4 &amp; later)</span>
           </li>
+          <li>
+            <em>d13y</em> &ndash; Delphi 13 Florence compiler <span class="highlight">(v8.1 &amp; later)</span>
+          </li>
           <li>
             <em>fpc</em> &ndash; Free Pascal compiler <span class="highlight">(all versions)</span>
           </li>
@@ -1011,6 +1014,14 @@ <h2>
       The <em>codesnip-export/routines/routine/xref</em> and <em>codesnip-export/routines/routine/xref/pascal-name</em> tags were removed from the specification. See <a href="#erratum">Erratum</a> above for details.
     </p>
   </dd>
+    <dl>
+      <dt>
+        <em>Version 8.1 - 11 September 2025</em>
+      </dt>
+      <dd>
+        Updated with CodeSnip v4.27.0 to add support for Delphi 13 Florence.
+      </dd>
+    </dl>
 </dl>
 
 </section>

Docs/Design/FileFormats/main-db.html

@@ -422,6 +422,9 @@ <h4>
       <li>
         <code class="key">Delphi12A</code> – Delphi 12 Athens compiler *
       </li>
+      <li>
+        <code class="key">Delphi13F</code> – Delphi 13 Florence compiler *
+      </li>
       <li>
         <code class="key">FPC</code> – Free Pascal compiler
       </li>

Docs/Design/FileFormats/user-db.html

@@ -641,6 +641,9 @@ <h3 id="xml-file">
           <li>
             <em>d12y</em> &ndash; Delphi 12 Athens compiler <span class="highlight">(v6.12 &amp; later)</span>
           </li>
+          <li>
+            <em>d13f</em> &ndash; Delphi 13 Florence compiler <span class="highlight">(v6.14 &amp; later)</span>
+          </li>
           <li>
             <em>fpc</em> &ndash; Free Pascal compiler <span class="highlight">(all versions)</span>
           </li>
@@ -1042,6 +1045,12 @@ <h2>
       <dd>
         Updated with CodeSnip v4.23.0 to add support for <a href="https://htmlpreview.github.io/?https://raw.githubusercontent.com/delphidabbler/reml/main/docs/reml-v6.html">REML v6</a>, which is backwards compatible with <a href="https://htmlpreview.github.io/?https://raw.githubusercontent.com/delphidabbler/reml/main/docs/reml-v4.html">REML v4</a>.
       </dd>
+      <dt>
+        Version 6.14 - 12 September 2025
+      </dt>
+      <dd>
+        Updated in time for CodeSnip v4.27.0 to add support for Delphi 13 Florence.
+      </dd>
     </dl>
   </dd>
 </dl>

Docs/ReadMe-portable.txt

@@ -14,7 +14,7 @@ online DelphiDabbler Code Snippets database as well as maintain a database of
 user-defined snippets.
 
 It displays details of each snippet in the database and can test-compile them
-with each installed Win32 version of Delphi from Delphi 2 to Delphi 12.x and
+with each installed Win32 version of Delphi from Delphi 2 to Delphi 13.x and
 Free Pascal.
 
 Compilable Pascal units can be created that contain selected snippets.

Docs/ReadMe-standard.txt

@@ -14,7 +14,7 @@ online DelphiDabbler Code Snippets database as well as maintain a database of
 user-defined snippets.
 
 It displays details of each snippet in the database and can test-compile them
-with each installed Win32 version of Delphi from Delphi 2 to Delphi 12.x and
+with each installed Win32 version of Delphi from Delphi 2 to Delphi 13.x and
 Free Pascal.
 
 Compilable Pascal units can be created that contain selected snippets.

Src/Compilers.UBDS.pas

@@ -154,6 +154,8 @@ function TBDSCompiler.GetIDString: string;
       Result := 'D11A';
     ciD12A:
       Result := 'D12Y';
+    ciD13F:
+      Result := 'D13F';
     else
       raise EBug.Create(ClassName + '.GetIDString: Invalid ID');
   end;
@@ -179,6 +181,7 @@ function TBDSCompiler.GetName: string;
   sDelphi104S = 'Delphi 10.4';    // Sydney
   sDelphi11A  = 'Delphi 11.x';    // Alexandria
   sDelphi12A  = 'Delphi 12.x';    // Athens
+  sDelphi13F  = 'Delphi 13.x';    // Florence
 begin
   case GetID of
     ciDXE:
@@ -211,6 +214,8 @@ function TBDSCompiler.GetName: string;
       Result := sDelphi11A;
     ciD12A:
       Result := sDelphi12A;
+    ciD13F:
+      Result := sDelphi13F;
     else
       Result := Format(sCompilerName, [ProductVersion]);
   end;
@@ -246,6 +251,7 @@ function TBDSCompiler.InstallationRegKey: string;
     ciD104S   : Result := '\Software\Embarcadero\BDS\21.0';
     ciD11A    : Result := '\Software\Embarcadero\BDS\22.0';
     ciD12A    : Result := '\Software\Embarcadero\BDS\23.0';
+    ciD13F    : Result := '\Software\Embarcadero\BDS\37.0';
     else raise EBug.Create(ClassName + '.InstallationRegKey: Invalid ID');
   end;
 end;

Src/Compilers.UGlobals.pas

@@ -45,6 +45,7 @@ interface
     ciD104S,                            // Delphi 10.4 Sydney,
     ciD11A,                             // Delphi 11.x Alexandria
     ciD12A,                             // Delphi 12 Athens
+    ciD13F,                             // Delphi 13 Florence
     ciFPC                               // Free Pascal
   );
 
@@ -58,7 +59,7 @@ interface
   cBDSCompilers = [
     ciD2005w32, ciD2006w32, ciD2007, ciD2009w32, ciD2010, ciDXE, ciDXE2,
     ciDXE3, ciDXE4, ciDXE5, ciDXE6, ciDXE7, ciDXE8, ciD10S, ciD101B, ciD102T,
-    ciD103R, ciD104S, ciD11A, ciD12A
+    ciD103R, ciD104S, ciD11A, ciD12A, ciD13F
   ];
 
 const

Src/DBIO.UIniDataReader.pas

@@ -236,7 +236,7 @@ implementation
     'Delphi2010', 'DelphiXE', 'DelphiXE2', 'DelphiXE3', 'DelphiXE4',
     'DelphiXE5', 'DelphiXE6', 'DelphiXE7', 'DelphiXE8', 'Delphi10S',
     'Delphi101B', 'Delphi102T', 'Delphi103R', 'Delphi104S', 'Delphi11A',
-    'Delphi12A',
+    'Delphi12A', 'Delphi13F',
     'FPC'
   );