From f96f4798bcb622046f52e94418dd0206cde8d799 Mon Sep 17 00:00:00 2001
From: Fabien Bodard <gambas.fr@gmail.com>
Date: Tue, 23 Feb 2010 20:57:51 +0000
Subject: [PATCH] [GB.REPORT] * BUG: now the property expand is a boolean

git-svn-id: svn://localhost/gambas/trunk@2714 867c0c6c-44f3-4631-809d-bfa615b0a4ec
---
 comp/src/gb.report/.info                    |  2 +-
 comp/src/gb.report/.src/ReportControl.class | 12 ++++++------
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/comp/src/gb.report/.info b/comp/src/gb.report/.info
index 476ad0dc4..d6728fea4 100644
--- a/comp/src/gb.report/.info
+++ b/comp/src/gb.report/.info
@@ -286,7 +286,7 @@ b
 
 Expand
 p
-i
+b
 
 Autoresize
 p
diff --git a/comp/src/gb.report/.src/ReportControl.class b/comp/src/gb.report/.src/ReportControl.class
index e1eee92da..c965057cc 100644
--- a/comp/src/gb.report/.src/ReportControl.class
+++ b/comp/src/gb.report/.src/ReportControl.class
@@ -38,7 +38,7 @@ Private $sPadding As String = "cm"
 
 Private $iVisible As Boolean = True
 Private $hFont As New Font
-Private $iExpand As Integer
+Private $bExpand As Boolean
 Private $bAutoresize As Boolean = False
 Private $bRelativeWidth As Boolean
 Private $bRelativeHeight As Boolean
@@ -60,7 +60,7 @@ Property Height As String
 
 Property Visible As Boolean
 Property {Font} As Font
-Property Expand As Integer
+Property Expand As Boolean
 Property Autoresize As Boolean
 
 
@@ -169,15 +169,15 @@ Private Sub Height_Write(Value As String)
 End
 
 
-Private Function Expand_Read() As Integer
+Private Function Expand_Read() As Boolean
 
-  Return $iExpand 
+  Return $bExpand 
 
 End
 
-Private Sub Expand_Write(Value As Integer)
+Private Sub Expand_Write(Value As Boolean)
 
-  $iExpand = Value
+  $bExpand = Value
 
 End