From 77a892cb219a64aaa34dbbc4bcee83ecb4ea22d0 Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Mon, 20 Aug 2018 09:30:04 +0200 Subject: [PATCH] Again, try to fix the high DPI issue on the text file import dialog. This time by moving the button toolbar below the "Columns" label. Closes #328. --- source/loaddata.dfm | 30 +++++++++++++++++------------- 1 file changed, 17 insertions(+), 13 deletions(-) diff --git a/source/loaddata.dfm b/source/loaddata.dfm index 6d9a3518..ce9b7a3e 100644 --- a/source/loaddata.dfm +++ b/source/loaddata.dfm @@ -346,46 +346,50 @@ object loaddataform: Tloaddataform Left = 112 Top = 72 Width = 153 - Height = 107 + Height = 129 Anchors = [akLeft, akTop, akRight, akBottom] ItemHeight = 13 TabOrder = 2 OnClick = chklistColumnsClick end object ToolBarColMove: TToolBar - Left = 112 - Top = 185 - Width = 69 - Height = 22 + Left = 10 + Top = 91 + Width = 58 + Height = 66 Align = alNone - Anchors = [akLeft, akBottom] AutoSize = True + ButtonWidth = 58 Caption = 'ToolBarColMove' Images = MainForm.ImageListMain + List = True ParentShowHint = False + ShowCaptions = True ShowHint = True TabOrder = 3 object btnColUp: TToolButton Left = 0 Top = 0 Hint = 'Move up' - Caption = 'btnColUp' + Caption = 'Up' ImageIndex = 74 + Wrap = True OnClick = btnColMoveClick end object btnColDown: TToolButton - Left = 23 - Top = 0 + Left = 0 + Top = 22 Hint = 'Move down' - Caption = 'btnColDown' + Caption = 'Down' ImageIndex = 75 + Wrap = True OnClick = btnColMoveClick end object btnCheckAll: TToolButton - Left = 46 - Top = 0 + Left = 0 + Top = 44 Hint = 'Select / Deselect all' - Caption = 'Select / Deselect all' + Caption = 'All' ImageIndex = 128 OnClick = btnCheckAllClick end