fix(android): the page stops sliding, and locking comes back
A swipe with nothing to scroll dragged the whole document, showing the body gradient sliding under the screen gradient - two gradients stacked and no content at all. overflow:hidden does not prevent that in an Android WebView; position:fixed does. The lock button went missing when the list moved to HTML: it lived in the old FMX bottom bar and had no counterpart in the page. It returns as a padlock next to the search field, no label - it is the one icon universal enough to stand alone. Icons on the unlock screen too, as code points since this source is read as ANSI. All four are basic-plane and common, so a font without them would show an empty box rather than a wrong glyph; checked on the device, they render. Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
This commit is contained in:
+17
-6
@@ -187,6 +187,17 @@ uses
|
||||
|
||||
{$R *.fmx}
|
||||
|
||||
const
|
||||
// Pictogrammes des boutons, EN POINTS DE CODE : ce fichier n'a pas de marque
|
||||
// d'ordre d'octets, Delphi le lit en ANSI, et un caractere ecrit tel quel y
|
||||
// deviendrait deux ou trois glyphes. Tous choisis dans le plan de base et
|
||||
// parmi les plus courants - une police systeme qui n'en aurait pas
|
||||
// afficherait un rectangle vide, ce qui se verrait tout de suite.
|
||||
GLYPH_OPEN = #$279C; // fleche pleine
|
||||
GLYPH_SYNC = #$21BB; // fleche circulaire
|
||||
GLYPH_GEAR = #$2699; // engrenage
|
||||
GLYPH_LOG = #$2261; // trois traits
|
||||
|
||||
{ ----------------------------------------------------------------------------
|
||||
Construction
|
||||
---------------------------------------------------------------------------- }
|
||||
@@ -334,17 +345,17 @@ begin
|
||||
LRow.Height := 48;
|
||||
LRow.Margins.Rect := RectF(16, 8, 16, 0);
|
||||
|
||||
FBtnLog := FlatButton(LRow, 'Log', OnToggleLog);
|
||||
FBtnLog := FlatButton(LRow, GLYPH_LOG + ' Log', OnToggleLog);
|
||||
FBtnLog.Align := TAlignLayout.Right;
|
||||
FBtnLog.Width := 120;
|
||||
FBtnLog.Margins.Left := 8;
|
||||
|
||||
FBtnSettings := FlatButton(LRow, 'Server settings', OnToggleSettings);
|
||||
FBtnSettings := FlatButton(LRow, GLYPH_GEAR + ' Server settings', OnToggleSettings);
|
||||
FBtnSettings.Align := TAlignLayout.Client;
|
||||
|
||||
FBtnSync := TopButton(FLayUnlock, 'Sync', DoSync);
|
||||
FBtnSync := TopButton(FLayUnlock, GLYPH_SYNC + ' Sync', DoSync);
|
||||
// Accentue : c'est l'action attendue quand aucun coffre n'est encore la.
|
||||
FBtnOpen := TopButton(FLayUnlock, 'Open vault', DoOpenLocal, 52, True);
|
||||
FBtnOpen := TopButton(FLayUnlock, GLYPH_OPEN + ' Open vault', DoOpenLocal, 52, True);
|
||||
|
||||
FStatus := TLabel.Create(Self);
|
||||
FStatus.Parent := FLayUnlock;
|
||||
@@ -373,12 +384,12 @@ begin
|
||||
Status('Vault on this device - protected')
|
||||
else
|
||||
Status('Vault on this device');
|
||||
SetButtonText(FBtnSync, 'Sync');
|
||||
SetButtonText(FBtnSync, GLYPH_SYNC + ' Sync');
|
||||
end
|
||||
else
|
||||
begin
|
||||
Status('No local vault - first download');
|
||||
SetButtonText(FBtnSync, 'Download vault');
|
||||
SetButtonText(FBtnSync, GLYPH_SYNC + ' Download vault');
|
||||
end;
|
||||
end;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user