mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-17 17:08:14 +02:00
parent
c08e2769d8
commit
f68e29767c
@ -797,7 +797,7 @@ begin
|
|||||||
risCheckedHot: ted:=FRIGroup.FedCheckedHot;
|
risCheckedHot: ted:=FRIGroup.FedCheckedHot;
|
||||||
end;
|
end;
|
||||||
ThemeServices.DrawElement(Canvas.Handle, ted, FRIGroup.FRadioRect);
|
ThemeServices.DrawElement(Canvas.Handle, ted, FRIGroup.FRadioRect);
|
||||||
FBGlyph.Draw(Canvas, ClientRect, FRIGroup.FGlyphPt, bsUp, False, 0);
|
FBGlyph.Draw(Canvas, ClientRect, FRIGroup.FGlyphPt, bsUp, False, 0, Font.PixelsPerInch, GetCanvasScaleFactor);
|
||||||
|
|
||||||
inherited Paint;
|
inherited Paint;
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user