Merge branch 'verinfo-twiddle-wakkas'

delphidabbler · delphidabbler · commit b996659ebda3 · 2023-05-10T10:27:22.000+01:00
diff --git a/VerInfo/3/API/Routines.md b/VerInfo/3/API/Routines.md
@@ -8,7 +8,7 @@ These functions are provided mainly for users of Delphi 2005 and earlier who don
 
 ## VerNumToStr
 
-***Introduced:*** v3.3
+**Applies to:** ~>3.3
 
 ```pascal
 function VerNumToStr(const Ver: TPJVersionNumber): string;
@@ -42,7 +42,7 @@ Users of Delphi 2006 and later can simply assign a [_TPJVersionNumber_](./TPJVer
 
 ## CompareVerNums
 
-***Introduced:*** v3.3
+**Applies to:** ~>3.3
 
 ```pascal
 function CompareVerNums(const Ver1, Ver2: TPJVersionNumber): Integer;
diff --git a/VerInfo/3/API/TPJVersionInfo-CharSet.md b/VerInfo/3/API/TPJVersionInfo-CharSet.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property CharSet: string;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-CharSetCode.md b/VerInfo/3/API/TPJVersionInfo-CharSetCode.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property CharSetCode: WORD;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-CurrentTranslation.md b/VerInfo/3/API/TPJVersionInfo-CurrentTranslation.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property CurrentTranslation: Integer;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-FileFlags.md b/VerInfo/3/API/TPJVersionInfo-FileFlags.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property FileFlags: DWORD;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-FileFlagsMask.md b/VerInfo/3/API/TPJVersionInfo-FileFlagsMask.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property FileFlagsMask: DWORD;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-FileName.md b/VerInfo/3/API/TPJVersionInfo-FileName.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property FileName: string;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-FileOS.md b/VerInfo/3/API/TPJVersionInfo-FileOS.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property FileOS: DWORD;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-FileSubType.md b/VerInfo/3/API/TPJVersionInfo-FileSubType.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property FileSubType: DWORD;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-FileType.md b/VerInfo/3/API/TPJVersionInfo-FileType.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property FileType: DWORD;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-FileVersionNumber.md b/VerInfo/3/API/TPJVersionInfo-FileVersionNumber.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property FileVersionNumber: TPJVersionNumber;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-FixedFileInfo.md b/VerInfo/3/API/TPJVersionInfo-FixedFileInfo.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property FixedFileInfo: TVSFixedFileInfo;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-HaveInfo.md b/VerInfo/3/API/TPJVersionInfo-HaveInfo.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property HaveInfo: Boolean;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-Language.md b/VerInfo/3/API/TPJVersionInfo-Language.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property Language: string;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-LanguageCode.md b/VerInfo/3/API/TPJVersionInfo-LanguageCode.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property LanguageCode: WORD;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-NumTranslations.md b/VerInfo/3/API/TPJVersionInfo-NumTranslations.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property NumTranslations: Integer;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-ProductVersionNumber.md b/VerInfo/3/API/TPJVersionInfo-ProductVersionNumber.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property ProductVersionNumber: TPJVersionNumber;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo-StringFileInfo.md b/VerInfo/3/API/TPJVersionInfo-StringFileInfo.md
@@ -6,6 +6,8 @@
 
 ***Class:*** [_TPJVersionInfo_](./TPJVersionInfo.md)
 
+**Applies to:** ~>3.0
+
 ```pascal
 property StringFileInfo[const Name: string]: string;
 ```
diff --git a/VerInfo/3/API/TPJVersionInfo.md b/VerInfo/3/API/TPJVersionInfo.md
@@ -4,6 +4,8 @@
 
 ***Unit:*** _PJVersionInfo_
 
+**Applies to:** ~>3.0
+
 ## Description
 
 This class defines a non-visual component that exposes version resource information contained in an executable file.
diff --git a/VerInfo/3/API/TPJVersionNumber.md b/VerInfo/3/API/TPJVersionNumber.md
@@ -4,6 +4,8 @@
 
 ***Unit:*** _PJVersionInfo_
 
+**Applies to:** ~>3.0
+
 ```pascal
 TPJVersionNumber = record
   V1: Word;   // Major version number
@@ -19,10 +21,31 @@ _V1_ represents the most significant version number and _V4_ represents the leas
 
 Common uses for these fields are shown in the comments in the record definition above.
 
-### Enhanced Functionality [v3.3]
+### Enhanced Functionality [~>3.3]
 
 When compiled with Delphi 2006 and later _TPJVersionNumber_ has some additional functionality. This functionality depends on the availability of advanced records, which were introduced with Delphi 2006.
 
+The revised record declaration is:
+
+```pascal
+// ~>3.3 version of TPJVersionNumber
+TPJVersionNumber = record
+  V1: Word;   // Major version number
+  V2: Word;   // Minor version number
+  V3: Word;   // Revision version number
+  V4: Word;   // Build number
+  {$IFDEF Supports_AdvancedRecords} // Delphi 2006 & later
+  class operator Implicit(Ver: TPJVersionNumber): string;
+  class operator LessThanOrEqual(Ver1, Ver2: TPJVersionNumber): Boolean;
+  class operator LessThan(Ver1, Ver2: TPJVersionNumber): Boolean;
+  class operator GreaterThan(Ver1, Ver2: TPJVersionNumber): Boolean;
+  class operator GreaterThanOrEqual(Ver1, Ver2: TPJVersionNumber): Boolean;
+  class operator Equal(Ver1, Ver2: TPJVersionNumber): Boolean;
+  class operator NotEqual(Ver1, Ver2: TPJVersionNumber): Boolean;
+  {$ENDIF}
+end;
+```
+
 #### String Assignment
 
 A _TPJVersionNumber_ record can be assigned to a string variable. The version number is stored in the string as a dotted quad.
@@ -45,7 +68,7 @@ end;
 
 You cannot reverse this assignment - a string cannot be assigned to a _TPJVersionNumber_ record.
 
-Users of Delphi 2005 and earlier can use the [_VerNumToStr_](./Routines.md#vernumtostr) routine to convert a _TPJVersionNumber_ to a string.
+Users of Delphi 2005 and earlier can use the [_VerNumToStr_](./Routines.md#vernumtostr) [~>3.3] routine to convert a _TPJVersionNumber_ to a string.
 
 #### Operator Overloads
 
@@ -77,4 +100,4 @@ begin
 end;
 ```
 
-Users of Delphi 2005 and earlier can use the [_CompareVerNums_](./Routines.md#comparevernums) routine to compare two version numbers.
+Users of Delphi 2005 and earlier can use the [_CompareVerNums_](./Routines.md#comparevernums) [~>3.3] routine to compare two version numbers.
diff --git a/VerInfo/3/Examples.md b/VerInfo/3/Examples.md
@@ -1,5 +1,7 @@
 # [Version Information Component](../index.md) Examples
 
+**Applies to:** ~>3.0
+
 The following examples of using the [Version Information Component](../index.md) are available:
 
 * [Example 1](./Examples/Example1.md) - Using the various fixed file information properties
diff --git a/VerInfo/3/Examples/Example1.md b/VerInfo/3/Examples/Example1.md
@@ -1,5 +1,7 @@
 # Example 1: Using fixed file information properties
 
+**Applies to:** ~>3.0
+
 This rather long example shows how to use the Version Information Component's fixed file information properties. It displays descriptions of the properties in a memo. Most of the example is taken up with code that maps fixed file information codes onto descriptive names. The real meat of the example comes in the form creation event handler at the end of the code.
 
 A [similar example](./Example2.md) shows how to achieve the same results using the _[FixedFileInfo](../API/TPJVersionInfo-FixedFileInfo.md)_ property.
diff --git a/VerInfo/3/Examples/Example2.md b/VerInfo/3/Examples/Example2.md
@@ -1,5 +1,7 @@
 # Example 2: Using the _FixedFileInfo_ property
 
+**Applies to:** ~>3.0
+
 This extended example shows how to use the _[FixedFileInfo](../API/TPJVersionInfo-FixedFileInfo.md)_ property. It displays descriptions of the values of some of the fields of the structure returned by the _FixedFileInfo_ property in a memo. Most of the example is taken up with code that maps fixed file info codes onto descriptive names. The real meat of the example comes in the form creation event handler at the end of the code.
 
 A [similar example](./Example1.md) shows how to achieve the same results using various specialised fixed file information properties.
diff --git a/VerInfo/3/Examples/Example3.md b/VerInfo/3/Examples/Example3.md
@@ -1,5 +1,7 @@
 # Example 3: Using translation, character set and language properties
 
+**Applies to:** ~>3.0
+
 This example shows how to use the translation, character set and language properties of _[TPJVersionInfo](../API/TPJVersionInfo.md)_ to display details of the language and character set for all translations in a file's version info. The example assumes the application contains version information. If this is not the case then a message to that effect is displayed in the list box.
 
 Drop a _TListBox_ and a _[TPJVersionInfo](../API/TPJVersionInfo.md)_ component on a form and add the following _OnCreate_ event handler to the form:
diff --git a/VerInfo/3/Examples/Example4.md b/VerInfo/3/Examples/Example4.md
@@ -1,5 +1,7 @@
 # Example 4: Using string information properties
 
+**Applies to:** ~>3.0
+
 This example demostrates how to access string information from a version resource using _[TPJVersionInfo](../API/TPJVersionInfo.md)_. It demonstrates two methods - the first using dedicated properties such as _LegalCopyright_ and the second using the _[StringFileInfo](../API/TPJVersionInfo-StringFileInfo.md)_ property. The example also demonstrates the use of the _[FileName](../API/TPJVersionInfo-FileName.md)_ property to access information in other files.
 
 Drop a _TMemo_, two _TButton_ controls and a _[TPJVersionInfo](../API/TPJVersionInfo.md)_ component onto a form and add the following function and event handlers:
diff --git a/VerInfo/3/Overview.md b/VerInfo/3/Overview.md
@@ -1,5 +1,7 @@
 # [Version Information Component](../index.md) Overview
 
+**Applies to:** ~>3.0
+
 This project contains a component, [_TPJVersionInfo_](./API/TPJVersionInfo.md), which is a non-visual component that reads any version information contained in a 32 bit or 64 bit Windows executable file.
 
 The component reads information from a designated file's [VERSIONINFO resource](https://learn.microsoft.com/en-gb/windows/win32/menurc/versioninfo-resource). 
