From 493ab846b961edcf4fe611c4708ffe590c042388 Mon Sep 17 00:00:00 2001 From: mappu Date: Sun, 30 Jun 2024 11:10:19 +1200 Subject: [PATCH] gui: adjust styles for query frame --- main.go | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/main.go b/main.go index a9dff1f..8150a1d 100644 --- a/main.go +++ b/main.go @@ -216,8 +216,9 @@ func (f *TMainForm) OnFormCreate(sender vcl.IObject) { queryButtonBar.SetAlign(types.AlTop) queryButtonBar.BorderSpacing().SetLeft(MY_SPACING) queryButtonBar.BorderSpacing().SetTop(MY_SPACING) - queryButtonBar.BorderSpacing().SetBottom(0) + //queryButtonBar.BorderSpacing().SetBottom(1) queryButtonBar.BorderSpacing().SetRight(MY_SPACING) + queryButtonBar.SetEdgeBorders(0) queryButtonBar.SetImages(f.ImageList) queryButtonBar.SetShowCaptions(true) @@ -234,8 +235,9 @@ func (f *TMainForm) OnFormCreate(sender vcl.IObject) { f.queryInput.SetTop(1) f.queryInput.Font().SetName("monospace") f.queryInput.BorderSpacing().SetLeft(MY_SPACING) - f.queryInput.BorderSpacing().SetTop(0) + //f.queryInput.BorderSpacing().SetTop(1) f.queryInput.BorderSpacing().SetRight(MY_SPACING) + f.queryInput.SetBorderStyle(types.BsFrame) vsplit := vcl.NewSplitter(queryTab) vsplit.SetParent(queryTab)