From 95c308107c5036e3b2fcb6e7072bcf237ee356b2 Mon Sep 17 00:00:00 2001 From: r-zakarya <82443831+r-zakarya@users.noreply.github.com> Date: Fri, 18 Sep 2026 12:36:22 +0100 Subject: [PATCH] fix(apk): Save enregistre l'URL et le jeton tout de suite, sans attendre un telechargement Co-Authored-By: Claude Opus 5 --- mainApk.pas | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/mainApk.pas b/mainApk.pas index f246e07..eeac3e4 100644 --- a/mainApk.pas +++ b/mainApk.pas @@ -1812,6 +1812,17 @@ begin begin FUrl := TNetEncoding.URL.Decode(Param('u')).Trim; FToken := TNetEncoding.URL.Decode(Param('t')).Trim; + // SAVE ENREGISTRE. L'URL et le jeton n'etaient retenus qu'apres une + // reponse du depot : enregistres puis l'app fermee avant tout + // telechargement, ils avaient disparu au lancement suivant. Des valeurs + // fausses se corrigent comme elles se sont tapees ; seul le mot de passe + // de synchro reste hors de ce fichier (il n'y est pas protege). + if (FUrl <> '') and (FToken <> '') then + try + SaveDeviceSettings(FUrl, FToken); + except + on E: Exception do Log('settings not saved: ' + E.Message); + end; FPwd := TNetEncoding.URL.Decode(Param('p')); if FPwd <> FPwdShown then begin