FOLDEREX

[Alain da Silva]

Bom dia pessoal, não estou conseguindo atualizar meu folder conforme opção do combobox.

Estou fazendo assim:

  @ 33,320 COMBOBOX oSay3 VAR VarEvento[3] ITEMS ARRITEM6 OF DlgEmp Size 150,100 PIXEL ON CHANGE(FUNCAOCOMBO(VAREVENTO[3],ORAD,@NVALUE,@oFld))
  @ 55,5 FOLDEREX oFld SIZE 590,230 OF DlgEmp PIXEL ROUND 5 UPDATE  PROMPT  "S1000 Tabela de Estabelecimentos", "S1005 Tabela   .....

 

//*---------------------------------------------**
   function FUNCAOCOMBO(oCombo,oRadio,oVRadio,ofld)
//*---------------------------------------------**
   if SUBS(oCombo,1,5)="Todos".or.SUBS(oCombo,1,5)="S1000"
      oFld:noption:=1
      oFld:aDialogs[1]:Refresh()
      oFld:adialogs[1]:setfocus()
   elseif SUBS(oCombo,1,5)="S1005"
      oFld:noption:=2
      oFld:aDialogs[2]:Refresh()
      oFld:adialogs[2]:setfocus()

endif

 

Ele marca a aba 2 por exemplo mais não refresca os objetos dela, fica trazendo os objetos do folder 1

 

 

[kapiaba]

Eu acho que falta:

 

	   SetOption( nOption )