FIX: TControl.InvalidatePreferredSize loop detected sboxOptionsEditor

This commit is contained in:
Alexander Koblov 2015-12-11 22:05:12 +00:00
commit 9a2d3dec2b
3 changed files with 569 additions and 526 deletions

File diff suppressed because it is too large Load diff

View file

@ -1,4 +1,10 @@
TFRMOPTIONSDIRECTORYHOTLIST.GBDIRECTORYHOTLIST.CAPTION=Directory Hotlist (reorder by drag && drop)
TFRMOPTIONSDIRECTORYHOTLIST.GBHOTLISTOTHEROPTIONS.CAPTION=Other options
TFRMOPTIONSDIRECTORYHOTLIST.CBADDTARGET.CAPTION=When adding directory, add also target
TFRMOPTIONSDIRECTORYHOTLIST.CBFULLEXPANDTREE.CAPTION=Always expand tree
TFRMOPTIONSDIRECTORYHOTLIST.CBSHOWPATHINPOPUP.CAPTION=In popup, show [path also]
TFRMOPTIONSDIRECTORYHOTLIST.CBSHOWONLYVALIDENV.CAPTION=Show only valid environment variables
TFRMOPTIONSDIRECTORYHOTLIST.RGWHERETOADD.CAPTION=Addition from main panel:
TFRMOPTIONSDIRECTORYHOTLIST.BTNINSERT.CAPTION=Insert...
TFRMOPTIONSDIRECTORYHOTLIST.BTNDELETE.CAPTION=Delete...
TFRMOPTIONSDIRECTORYHOTLIST.BTNEXPORT.CAPTION=Export...
@ -8,18 +14,12 @@ TFRMOPTIONSDIRECTORYHOTLIST.BTNMISCELLANEOUS.CAPTION=Miscellaneous...
TFRMOPTIONSDIRECTORYHOTLIST.BTNADD.CAPTION=Add...
TFRMOPTIONSDIRECTORYHOTLIST.BTNSORT.CAPTION=Sort...
TFRMOPTIONSDIRECTORYHOTLIST.BTNHELP.CAPTION=Help
TFRMOPTIONSDIRECTORYHOTLIST.RGWHERETOADD.CAPTION=Addition from main panel:
TFRMOPTIONSDIRECTORYHOTLIST.GBHOTLISTOTHEROPTIONS.CAPTION=Other options
TFRMOPTIONSDIRECTORYHOTLIST.CBADDTARGET.CAPTION=When adding directory, add also target
TFRMOPTIONSDIRECTORYHOTLIST.CBFULLEXPANDTREE.CAPTION=Always expand tree
TFRMOPTIONSDIRECTORYHOTLIST.CBSHOWPATHINPOPUP.CAPTION=In popup, show [path also]
TFRMOPTIONSDIRECTORYHOTLIST.CBSHOWONLYVALIDENV.CAPTION=Show only valid environment variables
TFRMOPTIONSDIRECTORYHOTLIST.LBLEDITHOTDIRNAME.EDITLABEL.CAPTION=Name:
TFRMOPTIONSDIRECTORYHOTLIST.LBLEDITHOTDIRPATH.EDITLABEL.CAPTION=Path:
TFRMOPTIONSDIRECTORYHOTLIST.LBLEDITHOTDIRTARGET.EDITLABEL.CAPTION=Target:
TFRMOPTIONSDIRECTORYHOTLIST.BTNRELATIVEPATH.HINT=Some functions to select appropriate path
TFRMOPTIONSDIRECTORYHOTLIST.BTNRELATIVETARGET.HINT=Some functions to select appropriate target
TFRMOPTIONSDIRECTORYHOTLIST.CBSORTHOTDIRPATH.TEXT=Name, a-z
TFRMOPTIONSDIRECTORYHOTLIST.LBLEDITHOTDIRTARGET.EDITLABEL.CAPTION=Target:
TFRMOPTIONSDIRECTORYHOTLIST.BTNRELATIVETARGET.HINT=Some functions to select appropriate target
TFRMOPTIONSDIRECTORYHOTLIST.CBSORTHOTDIRTARGET.TEXT=Name, a-z
TFRMOPTIONSDIRECTORYHOTLIST.MIHOTDIRTESTMENU.CAPTION=HotDirTestMenu
TFRMOPTIONSDIRECTORYHOTLIST.MITYPETHEDIRECTORY3.CAPTION=Insert directory I will type

View file

@ -3,7 +3,7 @@
-------------------------------------------------------------------------
Configuration of HotDir
Copyright (C) 2009-2014 Alexander Koblov (alexx2000@mail.ru)
Copyright (C) 2009-2015 Alexander Koblov (alexx2000@mail.ru)
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
@ -67,6 +67,8 @@ type
miSeparator9: TMenuItem;
miSortSingleGroup2: TMenuItem;
miCurrentSelectedOrActiveDirectories: TMenuItem;
pnlBottom: TPanel;
pnlClient: TPanel;
pmPathHelper: TPopupMenu;
rgWhereToAdd: TRadioGroup;
pnlButtons: TPanel;
@ -2023,6 +2025,7 @@ end;
{ TfrmOptionsDirectoryHotlist.Init }
procedure TfrmOptionsDirectoryHotlist.Init;
begin
pnlBottom.Constraints.MinHeight := pnlBottom.Height;
ParseLineToList(rsOptAddFromMainPanel, rgWhereToAdd.Items);
end;