Delete privacy statement help topic and removed all references to it

Removed link from main menu help topic, help TOC and help Index. Also removed menu item from main menu and related action

Author: delphidabbler

Src/FmMain.dfm

@@ -613,12 +613,6 @@ inherited MainForm: TMainForm
       OnExecute = actPrintExecute
       OnUpdate = actPrintUpdate
     end
-    object actPrivacy: TAction
-      Category = 'Help'
-      Caption = 'Privacy Statement'
-      Hint = 'View privacy statement|View the program'#39's privacy statement'
-      OnExecute = actPrivacyExecute
-    end
     object actBackupDatabase: TAction
       Category = 'Database'
       Caption = 'Backup User Database...'
@@ -1139,9 +1133,6 @@ inherited MainForm: TMainForm
       object miHelpCompChecks: TMenuItem
         Action = actHelpCompChecks
       end
-      object miPrivacy: TMenuItem
-        Action = actPrivacy
-      end
       object miLicense: TMenuItem
         Action = actLicense
       end

Src/FmMain.pas

@@ -96,7 +96,6 @@   TMainForm = class(THelpAwareForm)
     actPreferences: TAction;
     actPreviousTab: TAction;
     actPrint: TAction;
-    actPrivacy: TAction;
     actRenameCategory: TAction;
     actRestoreDatabase: TAction;
     actSaveDatabase: TAction;
@@ -167,7 +166,6 @@   TMainForm = class(THelpAwareForm)
     miNewDetailsTab: TMenuItem;
     miPreferences: TMenuItem;
     miPrint: TMenuItem;
-    miPrivacy: TMenuItem;
     miRenameCategory: TMenuItem;
     miReportBug: TMenuItem;
     miRestoreDatabase: TMenuItem;
@@ -383,8 +381,6 @@   TMainForm = class(THelpAwareForm)
     procedure actPrintExecute(Sender: TObject);
     ///  <summary>Determines whether the Print action can be enabled.</summary>
     procedure actPrintUpdate(Sender: TObject);
-    ///  <summary>Displays the Privacy Statement help topic.</summary>
-    procedure actPrivacyExecute(Sender: TObject);
     ///  <summary>Displays a dialogue box that can be used to rename a user
     ///  defined category.</summary>
     procedure actRenameCategoryExecute(Sender: TObject);
@@ -958,11 +954,6 @@ procedure TMainForm.actPrintUpdate(Sender: TObject);
     TPrintMgr.CanPrint(fMainDisplayMgr.CurrentView);
 end;
 
-procedure TMainForm.actPrivacyExecute(Sender: TObject);
-begin
-  DisplayHelp('PrivacyStatement');
-end;
-
 procedure TMainForm.actRenameCategoryExecute(Sender: TObject);
 begin
   TUserDBMgr.RenameACategory;

Src/Help/CodeSnip.hhp

@@ -83,7 +83,6 @@ HTML\menu_view.htm
 HTML\navigation.htm
 HTML\new.htm
 HTML\overview_pane.htm
-HTML\privacy_statement.htm
 HTML\quickstart.htm
 HTML\reml.htm
 HTML\snippet_class.htm

Src/Help/HTML/menu_help.htm

@@ -63,19 +63,6 @@ <h1>
           <em>CodeSnip</em>'s ability to test compile snippets.
         </td>
       </tr>
-      <tr>
-        <td class="img">
-          &nbsp;
-        </td>
-        <td class="item">
-          Privacy Statement
-        </td>
-        <td class="desc">
-          Selecting this option displays <em>CodeSnip</em>'s
-          <a href="privacy_statement.htm">privacy statement</a> in the help
-          file.
-        </td>
-      </tr>
       <tr>
         <td class="img">
           <img alt="Menu icon" src="../images/License.gif" class="glyph">

Src/Help/HTML/privacy_statement.htm

@@ -296,10 +296,6 @@
     <param name="Name" value="printing preferences">
     <param name="Local" value="HTML\dlg_prefs_printing.htm">
     </OBJECT>
-  <LI> <OBJECT type="text/sitemap">
-    <param name="Name" value="privacy statement">
-    <param name="Local" value="HTML\privacy_statement.htm">
-    </OBJECT>
   <LI> <OBJECT type="text/sitemap">
     <param name="Name" value="quickstart guide">
     <param name="Local" value="HTML\quickstart.htm">

Src/Help/Index.hhk

@@ -179,10 +179,6 @@
     <param name="Name" value="License">
     <param name="Local" value="HTML\license.htm">
     </OBJECT>
-  <LI> <OBJECT type="text/sitemap">
-    <param name="Name" value="Privacy Statement">
-    <param name="Local" value="HTML\privacy_statement.htm">
-    </OBJECT>
   <LI> <OBJECT type="text/sitemap">
     <param name="Name" value="FAQs">
     <param name="Local" value="HTML\faqs.htm">