paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-09 23:35:57 +02:00
Code Issues Packages Projects Releases Wiki Activity

Qt,Qt5: do not call setPrinterName() if current printerName is already setted up.part of issue #34569

Browse Source 
git-svn-id: trunk@59606 -
This commit is contained in:
zeljko 2018-11-19 17:45:28 +00:00
parent b36dbf345d
commit aacbf95adb
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/interfaces/qt/qtobjects.pas
View File

@ -4435,7 +4435,8 @@ var
Str: WideString;
begin
Str := AValue;
QPrinter_setPrinterName(FHandle, @Str);
if getPrinterName <> AValue then
QPrinter_setPrinterName(FHandle, @Str);
end;
function TQtPrinter.getPrinterName: WideString;

3
lcl/interfaces/qt5/qtobjects.pas
View File

@ -4441,7 +4441,8 @@ var
Str: WideString;
begin
Str := GetUtf8String(AValue);
QPrinter_setPrinterName(FHandle, @Str);
if getPrinterName <> Str then
QPrinter_setPrinterName(FHandle, @Str);
end;
function TQtPrinter.getPrinterName: WideString;