paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 18:39:52 +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

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

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

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

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