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

jvcllaz: Fix JvTabBar tab caption margin in XPPainter.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8350 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2022-07-14 23:05:57 +00:00
parent 6feb227a30
commit 6b91b30c26
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/jvcllaz/run/JvPageComps/jvtabbarxppainter.pas
View File

@ -139,7 +139,7 @@ begin
end;
TextRect := R;
TextRect.Left := TextRect.Left + Tab.TabBar.Margin;
TextRect.Left := TextRect.Left + Scale(tabBar, 4); //Tab.TabBar.Margin;
if Tab.TabBar.CloseButton then
begin
CloseRect := GetCloseRect(Canvas, Tab, R);