diff --git a/mainApk.pas b/mainApk.pas
index a0b00b3..8ba55d5 100644
--- a/mainApk.pas
+++ b/mainApk.pas
@@ -157,9 +157,6 @@ type
     // Reglages d'usage (Settings -> Copy and search), vrais par defaut. Rien de
     // secret : un petit fichier en clair dans le dossier prive de l'app.
     FUiBackAfterCopy, FUiKbdOnSearch: Boolean;
-    procedure LoadUiPrefs;
-    procedure SaveUiPrefs;
-    procedure PushUiPrefs;
     // La cle du verrouillage d'ecran est morte (schema retire ou reinitialise) :
     // on ouvre la copie de secours, scellee sous le mot de passe.
     FRecover: Boolean;
@@ -371,6 +368,9 @@ type
     /// que le proprietaire ne connaitrait pas.
     procedure SetUnlockCode(const ANew: string);
     procedure PushUnlockMode;
+    procedure LoadUiPrefs;
+    procedure SaveUiPrefs;
+    procedure PushUiPrefs;
     procedure ShowSettingsError(const AMsg: string);
     // Scanner du QR affiche par le poste (ZXing.Delphi, Apache 2.0).
   var
@@ -1689,7 +1689,7 @@ end;
 
 function UiPrefsPath: string;
 begin
-  Result := TPath.Combine(TPath.GetHomePath, 'ui-prefs.txt');
+  Result := System.IOUtils.TPath.Combine(System.IOUtils.TPath.GetHomePath, 'ui-prefs.txt');
 end;
 
 procedure TForm8.LoadUiPrefs;