Página 1 de 1

Cargar datos en un ComboBox

Publicado: Mar Nov 25, 2008 10:21 pm
por Armando Ruiz
Hola a todos,
Requiero que el contenido de de todos los renglones de una columna de una
matriz(TArrayBrowse) pueda cargase en un combobox............. y la otra es
como puedo pasar el contenido de una variable a un combobox.
En las propiedades del ComboBox aItems...... puedo cargar lo que deseo
visualizar, pero como puedo hacer la carga de datos de forma manual por
medio de codigo?
Saludos
Armando Ruiz

Cargar datos en un ComboBox

Publicado: Mié Nov 26, 2008 11:20 pm
por Christian
1) En la columna, en la propiedad nEditType ponele beLISTBOX
2) En el evento FormInitialize del formulario llena los arrays
aEditListBound y aEditListText de la columna en cuestion.
ej: aadd(::oTB:aCols[8]:aEditListBound,cCodigo)
aadd(::oTB:aCols[8]:aEditListText ,cDescripcion)
en aEditListBound van los codigos asociados a las descripciones y en
aEditListText las descripciones del combo
3) en el evento onGetValue de la columna pone lo siguiente:
local i:=ascan(::oTB:aCols[8]:aEditListText,::oTB:GetValue(8))
if i<>0
Value:=::oTB:aCols[8]:aEditListBound
else
Value:=1
endif
En otras palabras debes retornar el codigo del texto que contiene la columna
4) en el OnPostEdit vos tenes el codigo y debes guardar la descripcion
por eso pone:
local i:=ascan(::oTB:aCols[8]:aEditListBound,Value)
::oTB:SetValue(8,::oTB:aCols[8]:aEditListText)
Espero que te sirve yo lo uso y esta muy bueno.
Saludos Atte
Christian
Armando Ruiz escribió:
> Hola a todos,
>
> Requiero que el contenido de de todos los renglones de una columna de
> una matriz(TArrayBrowse) pueda cargase en un combobox............. y la
> otra es como puedo pasar el contenido de una variable a un combobox.
>
> En las propiedades del ComboBox aItems...... puedo cargar lo que deseo
> visualizar, pero como puedo hacer la carga de datos de forma manual por
> medio de codigo?
>
> Saludos
> Armando Ruiz