Clipper/FiveWin - PROBLEMAS ListBox

Mi consulta es la Siguiente tengo el LISTBOX de esta manera:

If campox=1
cTitulo:="Bodega 1"+","+"Bodega 2"
Else
cTitulo:="Bodega 3"+","+"Bodega 4"
Endif
REDEFINE LISTBOX oLbx FIELDS (cBodega)->Bodx,(cBodega)->Body;
HEADERS cTitulo;
FIELDSIZES 80,80;
lo que pasa q' el HEADERS me reconoce el cTitulo como uno solo y no como dos que puedo hacer para q' me reconozca ambos

desde ya le agradeceria su ayuda
Saludos
Jose

If campox = 1
cCampo1 := "Bodega 1"
cCampo2 := "Bodega 2"
Else
cCampo1 := "Bodega 3"
cCampo2 := "Bodega 4"
Endif
REDEFINE LISTBOX oLbx FIELDS (cBodega)->Bodx,(cBodega)->Body;
HEADERS cCampo1, cCampo2 ;
FIELDSIZES 80,80;

Un saludo

Alvaro

Si alvaro pero yo lo quiero poner como una variable es decier :
cTitulo:=cCampo1+","+cCampo2
pero el HEADERS no me reconoce como dos titulo si no como uno solo las ideas es que sea una variable
REDEFINE LISTBOX oLbx FIELDS (cBodega)->Bodx,(cBodega)->Body;
HEADERS cTitulo;
FIELDSIZES 80,80;
Saludos
Jose

Jose,

Creo que cada campo tiene que tener un Headers diferente.

Un saludo

Alvaro

Ok, creo entender que lo tu quieres es tener DOS RENGLONES en la cabecera del cada columna.

Si eso es lo que quieres, no se puede hacer con el ListBox nativo de FW, necesitas utilizar el ListBox de Hernan Diego Cecarelli o en su defecto la clase TSBrowse ambas las puedes conseguir en www.fivewin.info.

Ola,
faça o seguinte:
crie uma variavel tipo Local , e em frente a opcao HEADERS inclua uma funcao
veja abaixo.

LOCAL cTitulo:={}

REDEFINE LISTBOX oLbx FIELDS (cBodega)->Bodx,(cBodega)->Body;
HEADERS cTitulo:=cHeader{} ;
FIELDSIZES 80,80;

// ======================================================
Function cHeader()
LOCAL cHeader1
If campox=1
cHeader1:={"Bodega 1"+","+"Bodega 2" }
Else
cHeader1:={"Bodega 3"+","+"Bodega 4" }
Endif
return cHeader1

// ============================================

abracos,
Nelson Nunes de Araujo

Brasil, 27/11/2005