From 288b346f1aea68ea5f1c0dfc19fd44a15cf527f6 Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Sun, 28 Dec 2025 13:12:58 +0100 Subject: [PATCH] enhance: indicate drop-down menu through arrow-down image on buttons --- source/connections.lfm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/source/connections.lfm b/source/connections.lfm index a7c2ddb3..145a9ed1 100644 --- a/source/connections.lfm +++ b/source/connections.lfm @@ -1215,7 +1215,7 @@ object connform: Tconnform BorderSpacing.Right = 6 Caption = 'New' Images = MainForm.ImageListMain - ImageIndex = 45 + ImageIndex = 107 TabOrder = 0 OnClick = btnNewDropdown end @@ -1245,6 +1245,8 @@ object connform: Tconnform BorderSpacing.Left = 6 Caption = 'More' Constraints.MinWidth = 105 + Images = MainForm.ImageListMain + ImageIndex = 107 TabOrder = 5 OnClick = btnMoreClick end