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