FiveTech Support Forums

I must show ten images
each image name is img_name := "Image_" + hb_ntos( i )
If call myfunction() the value of nvalue is the same why ?

count:= 10
nvalue:= 0
col:= 10

nRow:= 10

For i := 1 TO count
img_name := "Image_" + hb_ntos( i )
@ nRow, Col IMAGE &img_name SIZE 12, 12 OF oDlg FILENAME Empty_Img PIXEL NOBORDER ;
ON CLICK (nvalue := Val( SubStr( img_name, RAt( '_', img_name ) + 1 ) ), myfunction())

&img_name:lTransparent := .T.

&img_name:bMMoved :={ || (nvalue := Val( SubStr( img_name, RAt( '_', img_name ) + 1 ) ), myfunction() ) }

&img_name:bMLeave :={ || (nvalue := Val( SubStr( img_name, RAt( '_', img_name ) + 1 ) ), myfunction()) }

Col += 12
Next

return nil

Function myfunction()
msginfo(nvalue)
return nil

Silvio,

Should nValue not be set as a Public variable ?

Now it is local and the changes never go to the function, because you don't pass it when you call the function.

Marc