I'm probably missing something, but if it's simply the "passing" you want to avoid, why don't you set up a "(sub)class" for the different cursoradaptors that you need, and only pass the parameters / properties that would not be inherited; eg.

DEFINE CLASS caFoo1 AS caFoo
   ...
ENDDEFINE

DEFINE CLASS caFoo AS CursorAdaptor
   ...
ENDDEFINE

BTW, I avoid cumbersome parameter passing by using "scripts"; eg.

o1 = CREATEOBJECT( "Foo", ".propa = 1; .propb = 2" )
...

DEFINE CLASS Foo AS ...

PROC Init
   LPARAMETER TC_Script

   IF !EMPTY( TC_Script )
      WITH THIS
         = EXECSCRIPT( TC_Script )
      ENDWITH
   ENDIF

(In actuality, there would be a wrapper for EXECSCRIPT to convert the delimiter ";", or whatever, to a carriage return)

>The point was that I dont want to have to pass parameters
>for every possible combination of properties and /or queries
>that I might need.