Page 1 of 1

Como borro el arreglo utilizado en un combobox?

Posted: Thu Aug 14, 2008 3:18 pm
by Erick Almanza
Hola amigos

Por favor si alguien me indica como borrar los elementos de un arreglo utilizado en un combobox en tiempo de ejecucion. Actualmente puedo agregar; no logro eliminar los anteriores.

La idea es que dependiendo de la clasificacion lleno el arreglo de acategoria




EJEMPLO:
REDEFINE COMBOBOX o1 var XCLASIFICACION id 19 of odlg ;
ITEMS ACLASE ;
ON CHANGE ARREGLA1(xCLASIFICACION,@osele,@acategoria,@XSELE)

REDEFINE COMBOBOX oSELE var XSELE id 20 of odlg ;
ITEMS aCategoria

...................

FUNC ARREGLO1(xCLASIFICACION,osele,acategoria,XSELE)

aCategoria:={ }

IF XCLASIFICACION="PROVINCIA"
osele:add("Panama" )
osele:add("Cocle" )

ELSEif XCLASIFICACION="PAIS "
osele:add("COSTA RICA" )
osele:add("COLOMBIA" )
ENDIF
osele:refresh()

RETURN(NIL)



Saludos,

erick almanza
FW805,XHARBOUR 1.10, BCC55, MYSQL

Posted: Thu Aug 14, 2008 4:37 pm
by ADBLANCO
oCbx:setitems({})

Posted: Thu Aug 14, 2008 4:40 pm
by ADBLANCO
asTipacc:={}

oTIPACC:setitems(adTipacc)