help for creating a class

[Silvio.Falconi]

I'm converting a procedure into a class
on a class I cannot use Move function
how I can convert move ()
sample :

For n= 1 to ::nimages
::nLeftImage[n]-= 2
::aElementi[n]:Move( ::nRiga,::nLeftImage[n],,,.t.)
::aElementi[n]:Refresh()
next

any help please

[ukoenig]

Silvio,

on a class I cannot use Move function
how I can convert move ()

inside classes :

METHOD SetPos( nRow, nCol ) INLINE ::Move( nRow, nCol )

regards
Uwe

[Silvio.Falconi]

no good
aElementi[n] are xmages
it not found Move or setpos method

[cnavarro]

Your class will surely have to define it like this:

CLASS TMyClass FROM TControl (or any class that has the methods and data you need)

[Silvio.Falconi]

of course