Page 1 of 1

Encabezados en XBrowse

PostPosted: Mon Nov 10, 2014 9:56 pm
by Vikthor.Thomas
Buen día a tod@s

Cuando uso la clase xBrowse para mostrar el contenido de un array. Ocurren dos cosas.
Sí el arreglo está vacío, sólo se muestra una columna con el título "Columna", en caso contrario los títulos se muestran correctamente.

Alguna sugerencia para mostrar los encabezados de forma correcta, aun cuando el arreglo de datos este vacío.

Saludos

Re: Encabezados en XBrowse

PostPosted: Tue Nov 11, 2014 11:05 pm
by nageswaragunupudi
Code: Select all  Expand view

local aData := {}

@ 0,0 XBROWSE oBrw OF oWnd DATASOURCE aData ;
         COLUMNS 1, 2, 3, 4, 5 ;
         HEADERS "One", "Two", "Three", "Four", "Five" ;
         CELL LINES NOBORDER
 

Re: Encabezados en XBrowse

PostPosted: Thu Nov 13, 2014 6:32 pm
by Vikthor.Thomas
Gracias por responder

Estoy usando la clase xBrowse con esta sintaxis :
Code: Select all  Expand view

REDEFINE XBROWSE oLbx  HEADERS "Columna","Titulo","Expresión","Longitud","Decimales","Total" DATASOURCE aCols ID 702 OF oDlg CELL LINES AUTOCOLS
 


Cuando el arreglo aCols tiene elementos, los encabezados se muestran correctamente. Pero cuando el arreglo está vacío, unicamente se muestra la primer columna.

Re: Encabezados en XBrowse

PostPosted: Thu Nov 13, 2014 10:57 pm
by Francisco Horta
Victor,

yo lo uso asi sin problemas

aComandas := {}

REDEFINE xBROWSE oBrw ;
COLUMNS 1 ;
HEADERS "No. Comanda" ;
COLSIZES 100 ;
ARRAY aComandas ;
ID 300 OF oDlg ;
FONT oFont ;
LINES FASTEDIT CELL

Re: Encabezados en XBrowse

PostPosted: Fri Nov 14, 2014 12:32 am
by nageswaragunupudi
Vikthor.Thomas wrote:Gracias por responder

Estoy usando la clase xBrowse con esta sintaxis :
Code: Select all  Expand view

REDEFINE XBROWSE oLbx  HEADERS "Columna","Titulo","Expresión","Longitud","Decimales","Total" DATASOURCE aCols ID 702 OF oDlg CELL LINES AUTOCOLS
 


Cuando el arreglo aCols tiene elementos, los encabezados se muestran correctamente. Pero cuando el arreglo está vacío, unicamente se muestra la primer columna.


Please do not use AUTOCOLS. Please use COLUMNS clause.
Code: Select all  Expand view

REDEFINE XBROWSE oLbx  COLUMNS 1,2,3,4,5,6 HEADERS "Columna","Titulo","Expresión","Longitud","Decimales","Total" DATASOURCE aCols ID 702 OF oDlg CELL LINES
 

Re: Encabezados en XBrowse

PostPosted: Tue Nov 18, 2014 2:32 pm
by Vikthor.Thomas
Gracias por la ayuda
El código funciona perfecto