diff --git a/ide/frames/editor_mouseaction_options.lfm b/ide/frames/editor_mouseaction_options.lfm index a340ed45c4..6a5100c562 100644 --- a/ide/frames/editor_mouseaction_options.lfm +++ b/ide/frames/editor_mouseaction_options.lfm @@ -54,7 +54,7 @@ inherited EditorMouseOptionsFrame: TEditorMouseOptionsFrame Height = 378 Top = 0 Width = 5 - MinSize = 25 + MinSize = 100 end end object p3: TPanel[1] diff --git a/ide/frames/editor_mouseaction_options.lrs b/ide/frames/editor_mouseaction_options.lrs index 8898e8dcbf..09634b3e18 100644 --- a/ide/frames/editor_mouseaction_options.lrs +++ b/ide/frames/editor_mouseaction_options.lrs @@ -20,7 +20,7 @@ LazarusResources.Add('TEditorMouseOptionsFrame','FORMDATA',[ +#11#13'tvoAutoExpand'#17'tvoAutoItemHeight'#16'tvoHideSelection'#21'tvoKeepC' +'ollapsedNodes'#11'tvoReadOnly'#14'tvoShowButtons'#12'tvoShowLines'#11'tvoSh' +'owRoot'#11'tvoToolTips'#0#0#0#9'TSplitter'#9'Splitter1'#4'Left'#3#130#0#6'H' - +'eight'#3'z'#1#3'Top'#2#0#5'Width'#2#5#7'MinSize'#2#25#0#0#0#242#2#1#6'TPane' + +'eight'#3'z'#1#3'Top'#2#0#5'Width'#2#5#7'MinSize'#2'd'#0#0#0#242#2#1#6'TPane' +'l'#2'p3'#23'AnchorSideRight.Control'#7#2'p2'#20'AnchorSideRight.Side'#7#9'a' +'srBottom'#24'AnchorSideBottom.Control'#7#2'p2'#21'AnchorSideBottom.Side'#7#9 +'asrBottom'#4'Left'#2#0#6'Height'#2'%'#3'Top'#3'z'#1#5'Width'#3'b'#2#5'Align' diff --git a/ide/frames/editor_mouseaction_options.pas b/ide/frames/editor_mouseaction_options.pas index 82b09e4d2b..f9f665cfda 100644 --- a/ide/frames/editor_mouseaction_options.pas +++ b/ide/frames/editor_mouseaction_options.pas @@ -27,8 +27,7 @@ interface uses LResources, EditorOptions, LazarusIDEStrConsts, IDEOptionsIntf, sysutils, StdCtrls, ExtCtrls, Classes, Controls, LCLProc, Grids, ComCtrls, Dialogs, - SynEditMouseCmds, editor_mouseaction_options_dlg; -// SynGutterCodeFolding; + SynEditMouseCmds, editor_mouseaction_options_dlg, math; type @@ -177,7 +176,7 @@ begin for i := 0 to ActionGrid.ColCount-1 do j := j + ActionGrid.ColWidths[i]; k := ActionGrid.ClientWidth; for i := 0 to ActionGrid.ColCount-1 do - ActionGrid.ColWidths[i] := ActionGrid.ColWidths[i] * k div j; + ActionGrid.ColWidths[i] := Max(ActionGrid.ColWidths[i] * k div j, 10); end; procedure TEditorMouseOptionsFrame.ActionGridHeaderSized(Sender: TObject; IsColumn: Boolean;