feat(windows): review comments

Author: rc-swag

windows/src/desktop/kmshell/main/UfrmMain.pas

@@ -797,7 +797,7 @@ procedure TfrmMain.Support_ProxyConfig;
     Free;
   end;
 end;
-// TODO: #10210 Remove Update
+// TODO-WINDOWS-UPDATES: #10210 Remove Update
 procedure TfrmMain.Support_UpdateCheck;
 begin
   with TOnlineUpdateCheck.Create(Self, True, False) do
@@ -838,7 +838,7 @@ procedure TfrmMain.Update_CheckNow;
 
 procedure TfrmMain.Update_ApplyNow;
 var
-  ShellPath, s: WideString;
+  ShellPath, s: string;
   FResult: Boolean;
 begin
   ShellPath := TKeymanPaths.KeymanDesktopInstallPath(TKeymanPaths.S_KMShell);

windows/src/desktop/kmshell/main/initprog.pas

@@ -253,7 +253,7 @@ function Init(var FMode: TKMShellMode; KeyboardFileNames: TStrings; var FSilent,
       else if s = '-?'   then FMode := fmHelpKMShell
       else if s = '-h'   then FMode := fmHelp
       else if s = '-t'   then FMode := fmTextEditor
-      //TODO: will remove -ouc not used
+      //TODO-WINDOWS-UPDATES: will remove -ouc not used
       // -buc uses the Statemachine can be used for external scripts to force a check
       else if s = '-ouc' then FMode := fmOnlineUpdateCheck
       else if s = '-buc' then FMode := fmBackgroundUpdateCheck

windows/src/engine/keyman/main.pas

@@ -40,14 +40,14 @@ implementation
   System.Win.Registry,
 
   GetOsVersion,
+  Keyman.System.ExecutionHistory,
   Keyman.System.Security,
   Keyman.Winapi.VersionHelpers,
   KeymanVersion,
+  Klog,
   RegistryKeys,
   UfrmKeyman7Main,
-  UserMessages,
-  Klog,
-  Keyman.System.ExecutionHistory;
+  UserMessages;
 
 function ValidateParameters(var FCommand: Integer): Boolean; forward;
 function PassParametersToRunningInstance(FCommand: Integer): Boolean; forward;