Extraer los Datos de un Listbox

[lubin]

Una consulta , espero me entiendan

Si tengo una LISTBOX con recursos, es posible extraerle desde otra función de su objeto oLBx asociado y sacar una relacion de los campos de las columnas (FIELDS) que lo conforman y los titulos (HEADER) ?

Algo Asi :

REDEFINE LISTBOX oLbx FIELDS M->Campo1, M->Campo2, M->Campo3 ;
HEADERS "Codigo","Nombre" ,"Apellido";
FIELDSIZES 25, 90, 90 ;
ON DBLCLICK MISCAMPOS( oLbx) ;
ID 990 OF oDlg
.....
.....

FUNCTION MISCAMPOS(oLbx)
*=============================
** AQUI PODER LISTAR LOS NOMBRES DE LOS CAMPOS Y SUS TITULOS O ENCABEZADOS..
? "MO HACERLO "

RETURN .T.


Gracias

[cmsoft]

Hola Lubin:
Con oLbx:aHeaders obtienes el arreglo con los titulos.
Con oLbx:bLine obtienes el bloque de codigo con los campos
Espero te sirva como inicio.

[lubin]

Perfecto

Me olvidaba, y la longitud asignada a la columna será con oLbx:Len o algo así ??

Lo probare de inmediato

Muchas gracias

[karinha]

Intente con:

Code: Select all  Expand view

   LEN( oLbx:aCols )
 

Saludos.