Sorry your browser is not supported!

Hi,

Simply trying to declare a global type and access it from a function, but it does'nt work (aka I musta messed something up). See the example below.

Thanks in advance,

For example:

TYPE _gb
gXSize AS Integer
gYSize AS Integer
gBlockSize AS Integer
ENDTYPE

----------------

global gb as _GB
gb.gXSize=10
gb.gYSize=17
gb.gBlockSize=10

*** This works correctly***

printat(0,0, str$(gb.gXSize)+"--------"+str$(gb.gYSize))

do
draw()
loop


function draw()
set current bitmap 0
copy bitmap 100, 0
rect(0,0,639,479)

x1=gb.gXSize

*** Does'nt work, comes up as 0 when it should be 10 as assigned in the beginning ***

printat(0,0, str$(x1)
*** it wont accept str$(gb.gXSize) as the parameter either ***
sync
endfunction

there was a bug recently in patch 3.0 and is fixed in patch 3.1 apparantly with integers and types.

I prefer to use an array like this method.

Many Thanks, found patch 3.1 (did'nt realize there was one above 3.0 available) and it works perfectly for now I had tried floats as well and the same problem existed.

Many thanks to the dbpro team for the object oriented additions to the langauge.