05-05-2007, 05:08 AM
im trying to get this to work and it just shuts down QM on me... this is what i have:
Function: CB_InitDialogVariable -
function# str&cbVar selItem
str controls = "7"
str cb7
cb7="&0.001[]0.002[]0.003[]0.004[]0.005[]0.006[]0.007[]0.008[]0.009"
int i; rget i "cb" "\MyAppName" 0 0; if(i>2) i=2
CB_InitDialogVariable cb7 i
if(!ShowDialog("" 0 &controls)) ret
i=val(cb7); rset i "cb" "\MyAppName" 0 0
GdiObject- brush=CreateSolidBrush(ColorFromRGB(50 75 125))
if(!ShowDialog("TEST" &TEST &controls 0 0 0 0 0 794 528 0)) ret
ARRAY(str) a=cbVar
a[selItem]-"&"; err ret
cbVar=a
ret 1
why wouldnt htis work?
Function: CB_InitDialogVariable -
function# str&cbVar selItem
str controls = "7"
str cb7
cb7="&0.001[]0.002[]0.003[]0.004[]0.005[]0.006[]0.007[]0.008[]0.009"
int i; rget i "cb" "\MyAppName" 0 0; if(i>2) i=2
CB_InitDialogVariable cb7 i
if(!ShowDialog("" 0 &controls)) ret
i=val(cb7); rset i "cb" "\MyAppName" 0 0
GdiObject- brush=CreateSolidBrush(ColorFromRGB(50 75 125))
if(!ShowDialog("TEST" &TEST &controls 0 0 0 0 0 794 528 0)) ret
ARRAY(str) a=cbVar
a[selItem]-"&"; err ret
cbVar=a
ret 1
why wouldnt htis work?