From 67f9451c0964a428dbdd66bf6fdf5cbf6c9e16f9 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Tue, 13 May 2008 14:22:15 +0000
Subject: [PATCH] examples: sprites: added comment about stretchdraw

git-svn-id: trunk@15119 -
---
 examples/sprites/playground.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/examples/sprites/playground.pas b/examples/sprites/playground.pas
index 7d21792558..1c33d86d54 100644
--- a/examples/sprites/playground.pas
+++ b/examples/sprites/playground.pas
@@ -157,7 +157,8 @@ end;
 procedure TPictureControl.Paint;
 begin
   if Picture.Graphic<>nil then
-    Canvas.StretchDraw(Rect(0,0,Width,Height),Picture.Graphic);
+    // Canvas.Draw(0,0,Picture.Graphic); // copy is fast
+    Canvas.StretchDraw(Rect(0,0,Width,Height),Picture.Graphic); // stretch is slow
   inherited Paint;
 end;