converting my function into a class
Posted: Fri Jan 03, 2020 6:13 pm
on a my function load many images with txImage to move it on a dialog
to move the images ( on my functions ) I use the easy command Move() with no Problems
and the image are showed into dialog with animation
this evening I'm try to converte my functions into a class
the same source but with data
but I have and error Error description: Error BASE/1004 No exported method: MOVE
I tried also to use
and change the line
but give me the error
Error description: Error BASE/1004 No exported method: SETPOS
How I can resolve it ?
to move the images ( on my functions ) I use the easy command Move() with no Problems
Code: Select all
For n= 1 to nImages
nLeftImage[n]:=nposition +nBmpWidth
aElements[n]:Move( nRowScroll,nLeftImage[n],,,.t.)
aElements[n]:Refresh()
nposition:= nLeftImage[n]
nextthis evening I'm try to converte my functions into a class
the same source but with data
Code: Select all
For n= 1 to ::nImages
::nLeftImage[n]:=nposition +nBmpWidth
::aElements[n]:Move( ::nRowScroll,::nLeftImage[n],,,.t.)
::aElements[n]:Refresh()
nposition:= ::nLeftImage[n]
nextI tried also to use
Code: Select all
METHOD SetPos( nRow, nCol ) INLINE ::Super:Move( nRow, nCol,,,.t. )Code: Select all
::aElements[n]:setPos( ::nRowScroll,::nLeftImage[n],,,.t.)Error description: Error BASE/1004 No exported method: SETPOS
How I can resolve it ?