feat(android): recolour the two native controls, and hide the log by default

Dark.style has no transparent template for an edit or a memo, so a StyleLookup at them fell back silently to the normal one and its grey background - the search field and the log were the last two things clashing with a painted interface. Since the style is vendored anyway, make-style.ps1 rebuilds it from Delphi's with those two backgrounds set to the palette. Reproducible, so a palette change does not quietly lose the patch.

The log is hidden now: it only serves diagnosis and it was taking a third of the screen at every launch. A Journal button beside the server settings brings it back.

Co-Authored-By: Claude Opus 5 <noreply@anthropic.com>
This commit is contained in:
r-zakarya
2026-08-15 17:43:52 +01:00
parent 5a2774974a
commit e8e305b6fd
3 changed files with 89 additions and 13 deletions
+10 -10
View File
@@ -1,4 +1,4 @@
object TLayout
object TLayout
Align = Client
Height = 715.000000000000000000
Position.Y = 33.000000000000000000
@@ -2075,18 +2075,18 @@ object TLayout
object TRectangle
StyleName = 'background'
Align = Contents
Fill.Color = xFF333333
Fill.Color = xFF1E293B
Locked = True
Height = 22.000000000000000000
HitTest = False
Stroke.Color = xFF202020
XRadius = 1.000000000000000000
YRadius = 1.000000000000000000
Stroke.Color = xFF334155
XRadius = 10.000000000000000000
YRadius = 10.000000000000000000
Width = 107.000000000000000000
end
object TBrushObject
StyleName = 'foreground'
Brush.Color = xFFEAEAEA
Brush.Color = xFFE2E8F0
end
object TBrushObject
StyleName = 'selection'
@@ -2509,7 +2509,7 @@ object TLayout
object TRectangle
StyleName = 'background'
Align = Contents
Fill.Color = xFF333333
Fill.Color = xFF1E293B
Locked = True
Height = 131.000000000000000000
HitTest = False
@@ -2517,9 +2517,9 @@ object TLayout
Padding.Top = 2.000000000000000000
Padding.Right = 2.000000000000000000
Padding.Bottom = 2.000000000000000000
Stroke.Color = xFF202020
XRadius = 2.000000000000000000
YRadius = 2.000000000000000000
Stroke.Color = xFF334155
XRadius = 10.000000000000000000
YRadius = 10.000000000000000000
Width = 334.000000000000000000
object TLayout
StyleName = 'content'