to simplify the Tdatabase call

[Silvio.Falconi]

I wanted to know if in Tdatabase I can do this

sample

CLASS TUtenti from TDataBase
METHOD New()
METHOD ToArray()
ENDCLASS

METHOD New( lShared ) CLASS TUtenti
Default lShared := .t.
::super:New(,oApp():cExePath + "Utenti" ,, lShared)
if ::use()
::setOrder(1)
::gotop()
endif
RETURN Self

METHOD ToArray(aTmp) CLASS TUtenti
if ::use()
aTmp:=ARRAYTODBF()
endif
RETURN aTmp

because I have some function I use often on all procedures and I ask I can insert on each class ,
but for a sample I not Know How save the field to array with arraytodbf until nos I used fw_arratodbf ( exclusive)

ANY SOLUTION ?

[James Bott]

Silvio,

I thought you already had this working? And the way you show it you care creating and array with every field, and I thought you only needed 3 fields?

[Silvio.Falconi]

James,
I resolved but I not use arraytodbf but to hand

[James Bott]

Silvio,

I resolved but I not use arraytodbf

Hmm, doesn't arraytodbf() take an array and put it into a DBF? I think you want DBFtoArry() if there is such a method.

James