From 02cbae04662ba487bbaf4fea3c6c607d1c8e59c4 Mon Sep 17 00:00:00 2001
From: dmitry <dmitry@lazarus-ide.org>
Date: Tue, 30 Mar 2010 18:17:30 +0000
Subject: [PATCH] carbon: improve DC antialiasing setting. if set to false,
 images are also rendered not-aliased

git-svn-id: trunk@24302 -
---
 lcl/interfaces/carbon/carboncanvas.pp | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lcl/interfaces/carbon/carboncanvas.pp b/lcl/interfaces/carbon/carboncanvas.pp
index cc5c78fe2c..ff1992882d 100644
--- a/lcl/interfaces/carbon/carboncanvas.pp
+++ b/lcl/interfaces/carbon/carboncanvas.pp
@@ -706,6 +706,10 @@ end;
  ------------------------------------------------------------------------------}
 procedure TCarbonDeviceContext.SetAntialiasing(AValue: Boolean);
 begin
+  if not AValue then
+    CGContextSetInterpolationQuality(CGContext, kCGInterpolationNone)
+  else
+    CGContextSetInterpolationQuality(CGContext, kCGInterpolationDefault);
   CGContextSetShouldAntialias(CGContext, CBool(AValue));
 end;