Files
Password-Manager/delphi-backend/UMainForm.fmx
T
Zaki 40b3154a34 feat: MFA tools, single-instance, tray polish, prefs persistence
Session highlights:

- feat(prefs): DPAPI-backed key/value store (PM.UserPrefs) — fixes
  rememberedUsername being lost across reboots due to the random
  ephemeral HTTP port changing the localStorage origin every launch.
  Bridge cmd://prefs/{get,set} round-trips through Delphi.

- feat(tray): icon visible from startup (NIM_ADD at constructor, not
  at first minimize). Tray context menu themed via uxtheme!135
  SetPreferredAppMode so it follows the app's dark/light setting.

- feat(single-instance): named mutex + RegisterWindowMessage broadcast.
  Second launch posts WM_PMSHOW to HWND_BROADCAST and exits; the
  running bridge restores the window from tray. Mutex lives in Local\
  namespace so distinct Windows users can still each run one.

- feat(mfa): Authenticator sidebar view (live TOTP codes for every
  entry with a secret) + standalone TOTP generator modal (paste
  base32 / otpauth:// URI, or generate a random 20-byte secret).

- feat(sidebar): Folders / Tags / Tools sections collapsible with
  chevron toggle. Badge counts stay visible when collapsed. State
  persisted in settings_json (synced across devices).

- feat(autofill): hotkey when vault is locked now restores the app
  and focuses the master password input instead of no-op'ing
  silently. Cleaner UX for the common "I hit Ctrl+Shift+L but the
  vault was locked" path.

- feat(quick-unlock): when enabled, skip lockVault on Windows lock /
  sleep. Rationale: the DPAPI blob already gates access via the
  Windows account, so re-locking on top of the OS lock is redundant.
  Idle auto-lock still fires (separate opt-in).

- fix(quick-unlock): re-sync state.quickUnlockEnabled from DPAPI
  source-of-truth at boot, instead of trusting (now-volatile)
  localStorage.

- docs: CLAUDE.md updated with all new modules, bridge commands,
  and the port-ephemeral pitfall.

Co-Authored-By: Claude Opus 4.7 <noreply@anthropic.com>
2026-06-08 21:31:39 +01:00

134 lines
3.9 KiB
Plaintext

object MainForm: TMainForm
Left = 0
Top = 0
Caption = 'Password Manager'
ClientHeight = 720
ClientWidth = 1100
FormFactor.Width = 320
FormFactor.Height = 480
FormFactor.Devices = [Desktop]
OnCreate = FormCreate
OnCloseQuery = FormCloseQuery
OnDestroy = FormDestroy
DesignerMasterStyle = 0
object PanelTop: TPanel
Align = Top
Size.Width = 1100.000000000000000000
Size.Height = 56.000000000000000000
Size.PlatformDefault = False
TabOrder = 0
object lblPort: TLabel
Position.X = 16.000000000000000000
Position.Y = 18.000000000000000000
Size.Width = 40.000000000000000000
Size.Height = 20.000000000000000000
Size.PlatformDefault = False
TextSettings.Trimming = None
Text = 'Port:'
TabOrder = 0
end
object edtPort: TEdit
Touch.InteractiveGestures = [LongTap, DoubleTap]
TabOrder = 1
Text = '8765'
Position.X = 56.000000000000000000
Position.Y = 14.000000000000000000
Size.Width = 80.000000000000000000
Size.Height = 24.000000000000000000
Size.PlatformDefault = False
end
object btnStart: TButton
Position.X = 152.000000000000000000
Position.Y = 14.000000000000000000
Size.Width = 80.000000000000000000
Size.Height = 24.000000000000000000
Size.PlatformDefault = False
TabOrder = 2
Text = 'Start'
TextSettings.Trimming = None
OnClick = btnStartClick
end
object btnStop: TButton
Position.X = 240.000000000000000000
Position.Y = 14.000000000000000000
Size.Width = 80.000000000000000000
Size.Height = 24.000000000000000000
Size.PlatformDefault = False
TabOrder = 3
Text = 'Stop'
TextSettings.Trimming = None
OnClick = btnStopClick
end
object btnReload: TButton
Position.X = 328.000000000000000000
Position.Y = 14.000000000000000000
Size.Width = 80.000000000000000000
Size.Height = 24.000000000000000000
Size.PlatformDefault = False
TabOrder = 4
Text = 'Reload'
TextSettings.Trimming = None
OnClick = btnReloadClick
end
object btnToggleLog: TButton
Position.X = 416.000000000000000000
Position.Y = 14.000000000000000000
Size.Width = 90.000000000000000000
Size.Height = 24.000000000000000000
Size.PlatformDefault = False
TabOrder = 5
Text = 'Hide log'
TextSettings.Trimming = None
OnClick = btnToggleLogClick
end
object lblStatus: TLabel
Position.X = 520.000000000000000000
Position.Y = 18.000000000000000000
Size.Width = 560.000000000000000000
Size.Height = 20.000000000000000000
Size.PlatformDefault = False
TextSettings.Trimming = None
Text = 'Stopped'
TabOrder = 6
end
end
object PanelLog: TPanel
Align = Bottom
Position.Y = 564.000000000000000000
Size.Width = 1100.000000000000000000
Size.Height = 156.000000000000000000
Size.PlatformDefault = False
TabOrder = 1
object Memo: TMemo
Touch.InteractiveGestures = [Pan, LongTap, DoubleTap]
DataDetectorTypes = []
ReadOnly = True
TextSettings.Font.Family = 'Consolas'
Align = Client
Size.Width = 1100.000000000000000000
Size.Height = 156.000000000000000000
Size.PlatformDefault = False
TabOrder = 0
Viewport.Width = 1096.000000000000000000
Viewport.Height = 152.000000000000000000
end
end
object Splitter: TSplitter
Align = Bottom
Cursor = crVSplit
MinSize = 20.000000000000000000
Position.Y = 558.000000000000000000
Size.Width = 1100.000000000000000000
Size.Height = 6.000000000000000000
Size.PlatformDefault = False
end
object WebBrowser: TTMSFNCWebBrowser
Align = Client
Size.Width = 1100.000000000000000000
Size.Height = 502.000000000000000000
Size.PlatformDefault = False
TabOrder = 3
DesigntimeEnabled = False
end
end