Page 1 of 1

Como usar los datos de una tabla en un combobox...

Posted: Thu Jul 12, 2007 4:38 pm
by Elias Torres
Hola a todos...

Necesito vuestra ayuda. Tengo un combo en el que cada elemento debe ser un campo de una tabla, pero me da error....

Yo lo estoy usando de la siguiente manera:

....

redefine combobox oCombo var cItems ITEMS alltrim(almacenes->nombre) id 200 of odlg30

....

Pero al intentar ejecutarlo me da un error que pone:


Argument error
AEVAL
Args:
[ 1] = C Almacen uno
[ 2] = B {|| ... }

stack calls:
TCOMBOBOX:DEFAULT(0)
TCOMBOBOX:INITIATE(0)
__OBJSENDMSG(0)
OSEND(0)
ASEND(0)
TDIALOG:INITIATE(0)
TDIALOG:HANDLEEVENT(0)
_FWPPC(0)
DIALOGBOX(0)
TDIALOG:ACTIVATE(0)
SELECCION_ALMACEN(252)
(b)BOTONERA(211)
TBTNBMP:CLICK(0)
TBTNBMP:LBUTTONUP(0)
TWINDOW:HANDLEEVENT(0)
TBTNBMP:HANDLEEVENT(0)
_FWPPC(0)
DIALOGBOX(0)
TDIALOG:ACTIVATE(0)
INVENTARIO(487)
(b)MAIN(38)
TBITMAP:LBUTTONDOWN(0)
TWINDOW:HANDLEEVENT(0)
TCONTROL:HANDLEEVENT(0)
TBITMAP:HANDLEEVENT(0)
_FWPPC(0)
DIALOGBOX(0)
TDIALOG:ACTIVATE(0)
MAIN(45)


Un saludo a todos...

ElĂ­as Torres.

Posted: Fri Jul 13, 2007 5:40 am
by Biel EA6DD
Hola Elias,
el parametro ITEMS del combobox debe ser un array, prueba de la siguiente manera.

Code: Select all

...
aNombre:={}
Almacenes->(dbEval({||aAdd(aNombre,AllTrim(Nombre))}))

redefine combobox oCombo var cItems ITEMS aNombre id 200 of odlg30 
...

Posted: Fri Jul 20, 2007 8:03 pm
by carlos vargas
N es mejor usar un dbcombo?

salu2
carlos vargas

Posted: Mon Jul 23, 2007 5:48 am
by Biel EA6DD
Hola Carlos,
si, dbCombo seria mas comodo, pero creo que dicha clase no esta disponible en FWPPC.