problema con wbrowse...

[Francisco Horta]

estoy probando a poner una imagen en una columna, para esto uso el lSelect de la clase para saber si estoy posicionado en el registro, y me manda este error al abrir el browse

No exported method: lSelect from errorsys, line: 0

mi codigo esta asi:

hBmp:=LoadBitMap(GetResources(),"Puntero")
@ 0,0 LISTBOX oBCos ;
FIELDS IF(oBCos:lSelect,hBmp,""), STR((oDCos)->Codigo,4),;
(oDCos)->Descri ;
HEADER "","Codigo", "D E S C R I P C I O N" ;
SIZES 20,90,350 ;
WHEN !(dbEmpty(oDCos)) OF oWndHija

es la wbrowse que modifico alfredo arteaga para poner el puntero,
gracias
paco

[Antonio Linares]

Paco,

Prueba a hacerlo en dos pasos:

@ 0,0 LISTBOX oBCos ;
FIELDS "", "", "" ;
HEADER "","Codigo", "D E S C R I P C I O N" ;
SIZES 20,90,350 ;
WHEN !(dbEmpty(oDCos)) OF oWndHija

oBCos:bLine := { || { IF(oBCos:lSelect,hBmp,""), STR((oDCos)->Codigo,4), (oDCos)->Descri } }

[Francisco Horta]

gracias antonio, funciono, pero este comportamiento a que se puede deber?
salu2
paco

[Antonio Linares]

Paco,

Al hacerlo en una sola línea se genera primero el codeblock para bLine y en ese momento oBCos es aún nil.

Después de la primera línea, oBCos ya no es nil y por eso el codeblock toma su valor correcto: el objeto browse

[Francisco Horta]

ok, gracias
paco