luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

[GB.REPORT]

Browse source 
* BUG: now the property expand is a boolean


git-svn-id: svn://localhost/gambas/trunk@2714 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Fabien Bodard 2010-02-23 20:57:51 +00:00
parent c644455a2e
commit f96f4798bc
2 changed files with 7 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
comp/src/gb.report/.info
View file

@ -286,7 +286,7 @@ b
Expand
p
i
b
Autoresize
p

12
comp/src/gb.report/.src/ReportControl.class
View file

@ -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