FoxPro/Visual FoxPro - ayuda con clase personalizada.

hola,
he creado una clase personalizda.. una imagen especificamente, tengo un formulario en el que el usuario va agragando mesas sillas, y todo eso.. son imagenees. lo hago con el siguiente codigo:

thisform.AddObject('&BH','image') &&
lo hace perfectamente bien....

el problema es que al hacerlo con esto no encontre la forma de en tiempo de ejecucion agregar lo que queria que hiciera en el evento click
por lo que decidi hacer una clase del objeto image, programar el evento click y todo bien, si uso mi clase en el formulario en modo diseño y lo ejecuto todo perfecto... el problema es q cuando intento agregar la clase en tiempo de ejucucion me da error.. dice q no encuentra mi clase creada.
thisform.AddObject('&BH','Bh') &&

alguien puede ayudarme??

Como no sé como se llaman tus clases y bibliotecas de clase supongo:
<Clase_Image="claseImg">
<Librería_vcx="Library.vcx">

Mejor usa
thisform.newobject(lcImage,"claseImg","library.vcx")

ó si la librería no está en el proyecto o no está definido el path en el inicio de la aplicación
lcRoot="c:\gralApps\clases"
Thisform.NewObject(lcImage , "claseImg" , addbs(lcRoot)+"library.vcx")

Yo utilizo una propiedad de _screen para determinar la ruta de las clases vcx
En main.prg de la aplicación, suponiendo que las clases están en la carpeta Libs del proyecto.
Addproperty(_screen,"CLASSDIR" , Addbs(fullpath(""))+"Libs")
El tema es que si tomas clases de otro proyecto, debes colocar la ruta del otro proyecto en el path y con eso te independizas de _Screen.Classdir o lo que fuere.

listo!!!

set classlib to clases/tableservice


en el main del prg.. y problema resuelto.!!!