From 1d7db6a607efbcdc75ac6dd2973b6ce9da7caa62 Mon Sep 17 00:00:00 2001
From: tombo <tombo@lazarus-ide.org>
Date: Tue, 23 Oct 2007 15:55:06 +0000
Subject: [PATCH] IDE About form: use Canvas.Draw instead of Canvas.CopyRect

git-svn-id: trunk@12569 -
---
 ide/aboutfrm.pas | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/ide/aboutfrm.pas b/ide/aboutfrm.pas
index a7fc65065a..7f1295445a 100644
--- a/ide/aboutfrm.pas
+++ b/ide/aboutfrm.pas
@@ -178,10 +178,9 @@ end;
 procedure TAboutForm.Paint;
 begin
   inherited Paint;
-  if FPixmap <>nil
-  then Canvas.Copyrect(
-    Bounds(12, PlatformLabel.Top+PlatformLabel.Height+6, Width, Height)
-    ,FPixmap.Canvas, Rect(0,0, Width, Height));
+  if FPixmap <> nil then
+    Canvas.Draw(12, PlatformLabel.Top + PlatformLabel.Height + 6,
+      FPixmap);
 end;
 
 initialization