pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

spkToolbar: Fix dimensions when the toolbar is in a frame rather than a form. Issue #37961.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7786 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2020-10-20 16:04:14 +00:00
parent 57a4b77d28
commit ee669bbd95
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/spktoolbar/SpkToolbar/SpkToolbar.pas
View File

@ -647,7 +647,7 @@ begin
//todo: not found in lcl //todo: not found in lcl
//inherited AlignWithMargins:=true; //inherited AlignWithMargins:=true;
if (AOwner is TForm) then if (AOwner is TForm) or (AOwner is TFrame) then
SpkInitLayoutConsts(96); // This default dpi value is ignored for LCL scaling SpkInitLayoutConsts(96); // This default dpi value is ignored for LCL scaling
// Height := CalcToolbarHeight; // Height := CalcToolbarHeight;