COMBOBOX refresh

[remecd]

How can I Refresh() Combobox with function Inv_Nasta2()

Tnx, Darjo

Code: Select all

#include "FWCE.ch"

FUNCTION Main()
PRIVATE ocbNah

   arrNahaja:={'1a','1b','1c'}
   STORE 1 TO cIzbPe,cIzbNah
   
   DEFINE WINDOW owInv
   @  93,0 SAY 'Main:' PIXEL
   @ 108,0 COMBOBOX cIzbPe ITEMS {'001','002'} PIXEL SIZE 240,200 ON CHANGE Inv_Nasta2()
   @ 135,0 SAY 'Sub:' PIXEL
   @ 150,0 COMBOBOX ocbNah VAR cIzbNah ITEMS arrNahaja PIXEL SIZE 240,200
   ACTIVATE WINDOW owInv
return nil


********************************
FUNCTION Inv_Nasta2()
********************************
arrNahaja:=array(0)
arrNahaja:={'2a','2b'}
ocbNah:Refresh()   && why does it not work ???
RETURN (.t.)

[Antonio Linares]

Darjo,

********************************
FUNCTION Inv_Nasta2()
********************************
arrNahaja:=array(0)
arrNahaja:={'2a','2b'}
ocb:SetItems( arrNahaja )
ocbNah:Refresh()
RETURN (.t.)