From f29dd380ea1f846e605a05604462b1d86606c62a Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 12 Oct 2009 15:17:16 +0000
Subject: [PATCH] aggpas: example diag line

git-svn-id: trunk@22118 -
---
 components/aggpas/lazarus/example/unit2.pas | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/components/aggpas/lazarus/example/unit2.pas b/components/aggpas/lazarus/example/unit2.pas
index b4a59d5a24..999597b26d 100644
--- a/components/aggpas/lazarus/example/unit2.pas
+++ b/components/aggpas/lazarus/example/unit2.pas
@@ -48,8 +48,9 @@ begin
     Pen.Color:=clBlue;
     Pen.Width:=1;
 
-    Line(10,10,20,10);
+    Line(12,10,22,10);
     Line(10,12,10,22);
+    Line(12,12,22,22);
   end;
 
   // convert to LCL native pixel format
@@ -61,8 +62,9 @@ begin
     Pen.Color:=clRed;
     Pen.Width:=1;
 
-    Line(22,10,32,10);
+    Line(24,10,34,10);
     Line(10,24,10,34);
+    Line(24,24,34,34);
   end;
 end;