paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-22 08:59:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

Qt5,Qt6: fixed distorted image creation from device (screenshoot) on HiDpi screens.

Browse Source 
(cherry-picked from commit 291a9fd3dd)

Co-authored-by: zeljan1 <zeljko@holobit.hr>
This commit is contained in:
Željan Rikalo 2025-02-11 08:59:23 +00:00 committed by Željan Rikalo
parent a540e7372b
commit 2754524965
2 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/qt5/qtlclintf.inc
View File

@ -755,6 +755,7 @@ var
Image: QImageH;
Context: TQtDeviceContext;
AWnd: HWND;
APixelRatio: QReal;
procedure RawImage_FromImage(AImage: QImageH);
begin
@ -788,8 +789,8 @@ begin
if Context.Parent <> nil then
begin
AWnd := HwndFromWidgetH(Context.Parent);
// AWnd should never be 0 at this point
APixmap := TQtWidget(AWnd).grabWindow(0, 0, DCSize.cx, DCSize.cy, Context.Parent);
APixelRatio := QScreen_devicePixelRatio(QWindow_screen(QWidget_windowHandle(Context.Parent)));
APixmap := TQtWidget(AWnd).grabWindow(0, 0, Round(DCSize.cx / APixelRatio), Round(DCSize.cy / APixelRatio), Context.Parent);
Image := QImage_Create;
QPixmap_toImage(APixmap, Image);
RawImage_FromImage(Image);

5
lcl/interfaces/qt6/qtlclintf.inc
View File

@ -774,6 +774,7 @@ var
Image: QImageH;
Context: TQtDeviceContext;
AWnd: HWND;
APixelRatio: QReal;
procedure RawImage_FromImage(AImage: QImageH);
begin
@ -807,8 +808,8 @@ begin
if Context.Parent <> nil then
begin
AWnd := HwndFromWidgetH(Context.Parent);
// AWnd should never be 0 at this point
APixmap := TQtWidget(AWnd).grabWindow(0, 0, DCSize.cx, DCSize.cy, Context.Parent);
APixelRatio := QScreen_devicePixelRatio(QWidget_screen(Context.Parent));
APixmap := TQtWidget(AWnd).grabWindow(0, 0, Round(DCSize.cx / APixelRatio), Round(DCSize.cy / APixelRatio), Context.Parent);
Image := QImage_Create;
QPixmap_toImage(APixmap, Image);
RawImage_FromImage(Image);