From 8a1e0ddf12f038f3abcfeded23ef0dcce21a554a Mon Sep 17 00:00:00 2001 From: dmitry Date: Fri, 7 Dec 2018 01:28:23 +0000 Subject: [PATCH] cocoa: update printing component to use LCLObjCBoolean type git-svn-id: trunk@59751 - --- components/printers/cocoa/cocoaprinters.inc | 4 ++-- components/printers/cocoa/cocoaprinters_h.inc | 6 +++--- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/components/printers/cocoa/cocoaprinters.inc b/components/printers/cocoa/cocoaprinters.inc index 6be2025a73..1996215012 100644 --- a/components/printers/cocoa/cocoaprinters.inc +++ b/components/printers/cocoa/cocoaprinters.inc @@ -107,7 +107,7 @@ begin end; // Return the number of pages available for printing -function TCocoaPrinterView.knowsPageRange(range: NSRangePointer): Boolean; +function TCocoaPrinterView.knowsPageRange(range: NSRangePointer): LCLObjCBoolean; begin range^.location := 1; range^.length := CGPDFDocumentGetNumberOfPages(doc); @@ -124,7 +124,7 @@ begin self.setBounds(result); end; -function TCocoaPrinterView.isFlipped: boolean; +function TCocoaPrinterView.isFlipped: LCLObjCBoolean; begin Result := true; end; diff --git a/components/printers/cocoa/cocoaprinters_h.inc b/components/printers/cocoa/cocoaprinters_h.inc index 13776e76c2..6a388d7a67 100644 --- a/components/printers/cocoa/cocoaprinters_h.inc +++ b/components/printers/cocoa/cocoaprinters_h.inc @@ -7,7 +7,7 @@ uses // fpc MacOSAll, CocoaAll, Classes, SysUtils, // lcl-widgetset - CocoaUtils, CocoaGDIObjects, + CocoaUtils, CocoaGDIObjects, CocoaPrivate, // lcl Printers, LCLType; @@ -25,9 +25,9 @@ type // drawing procedure drawRect(dirtyRect: NSRect); override; // manual paging, see https://developer.apple.com/library/mac/documentation/Cocoa/Conceptual/Printing/osxp_pagination/osxp_pagination.html - function knowsPageRange(range: NSRangePointer): Boolean; override; + function knowsPageRange(range: NSRangePointer): LCLObjCBoolean; override; function rectForPage(page: NSInteger): NSRect; override; - function isFlipped: boolean; override; + function isFlipped: LCLObjCBoolean; override; end;