Page 1 of 1
Ayuda con combox
Posted: Thu Dec 21, 2006 7:12 pm
by mjcc
Necesito colocar _ de una base de datos en un combobox por ejemplo nombre, codigo clienteo es la descripcion y otro el codigo del cliente. Una vez que realicen esta operacion necesito que el codigo lo pueda capturar para poder realizar una busqueda en otro fichero, y no tengo ni idea de como hacerlo.
Ya he buscado en el foro, pero no encuentro nigun ejemplo de este tipo
GRACIAS
Posted: Thu Dec 21, 2006 7:48 pm
by Antonio Linares
Manuel,
Primero crea y rellena un array con el contenido del campo ó campos que quieras mostrar:
Code: Select all
local oCbx, cValor, aValores := {}
Alias->( DbGoTop() )
while ! Alias->( EoF() )
AAdd( aValores, Str( Alias->Campo ) )
Alias->( DbSkip( 1 ) )
end
@ ..., ... COMBOBOX oCbx VAR cValor ITEMS aValores ... ;
ON CHANGE HazAlgo( oCbx:nAt )
oCbx:nAt es la posicion del elemento seleccionado. Tendrás que hacer un Alias->( DbGoTop() ), Alias->( DbSkip( oCbx:nAt ) ) para ir al registro seleccionado. En cValor tienes el valor seleccionado como cadena.
Gracias
Posted: Fri Dec 22, 2006 1:04 pm
by mjcc
OK, gracias