paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-26 16:27:23 +01:00
Code Issues Packages Projects Releases Wiki Activity

LCL: speed button: fix retina drawing. Issue #33645

Browse Source 
git-svn-id: trunk@57697 -
This commit is contained in:
ondrej 2018-04-25 06:19:35 +00:00
parent 49d41ac113
commit 3e5903f6fd
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/include/buttonglyph.inc
View File

@ -278,7 +278,7 @@ begin
if (ImgRes.Resolution=nil) or (ImgID<0) then if (ImgRes.Resolution=nil) or (ImgID<0) then
Exit; Exit;
ImgRes.Resolution.Draw(Canvas, ImgRes.Draw(Canvas,
Client.Left + Offset.X, Client.Top + Offset.y, ImgID, AEffect); Client.Left + Offset.X, Client.Top + Offset.y, ImgID, AEffect);
// ToDo: VCL returns the text rectangle // ToDo: VCL returns the text rectangle