From f99fb90ed807d4c985cd89a9186af18e694b8d46 Mon Sep 17 00:00:00 2001 From: r-zakarya <82443831+r-zakarya@users.noreply.github.com> Date: Fri, 18 Sep 2026 14:35:45 +0100 Subject: [PATCH] fix(apk): compilation des reglages Copy and search (declarations et TPath de System.IOUtils) Co-Authored-By: Claude Opus 5 --- mainApk.pas | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) 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;