mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

UPD: Cleanup.

Browse source
This commit is contained in:
cobines 2011-10-29 12:52:34 +00:00
commit ce7296d8f1
1 changed files with 2 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/frames/foptionshotkeys.pas
View file

@ -28,12 +28,10 @@ interface
uses
Classes, SysUtils, ExtCtrls, StdCtrls, Grids,
fOptionsFrame, uHotkeyManager, fgl;
fOptionsFrame, uHotkeyManager;
type
TStringMap = specialize TFPGMap<String, String>;
{ TfrmOptionsHotkeys }
TfrmOptionsHotkeys = class(TOptionsEditor)
@ -125,7 +123,7 @@ implementation
{$R *.lfm}
uses
Forms, Controls, Dialogs, LCLProc, {fMain,}
Forms, Controls, Dialogs, LCLProc,
uFindEx, uGlobs, uGlobsPaths, uLng, uTypes, uKeyboard, uFormCommands;
const
@ -412,11 +410,9 @@ procedure TfrmOptionsHotkeys.AutoSizeCommandsGrid;
begin
with stgCommands do
begin
BeginUpdate;
AutoSizeColumns;
if ClientWidth > GridWidth then
ColWidths[stgCmdCommentIndex] := ColWidths[stgCmdCommentIndex] + (ClientWidth - GridWidth);
EndUpdate;
end;
end;