Combo Box - Associar lista a instancia de XObject

#1

Bom dia,

Gostaria de utilizar uma Combo Box que tenha sempre preenchidos 5 items, que o utilizador pode escolher. Quando o utilizador escolher um dos items será carregado um valor de 1 a 5 correspondente ao texto escolhido pelo utilizador na lista.

O valor carregado também pode ser alterado em campo, pelo que o texto vísivel em primeiro plano na combo Box deverá trocar conforme as alterações de campo ou na aplicação.

Já tentei algumas coisas mas não estou a conseguir atingir a funcionalidade pretendida.

Alguma sugestão?

Segue uma captura do design pretendido. O problema é que neste momento estou a fazer clear e carregar a lista cada vez que a combo box é ativada. A lista deverá estar sempre carregada e não ser carregada e apagada.

Combo_box

#2

Olá @Gon_Fer,
Vejo dois scripts nesse objeto ComboBox:

  1. Criação dos itens:

Sub ComboBox1_OnStartRunning()
Clear()
AddItem “A”
AddItem “B”
AddItem “C”
AddItem “D”
AddItem “E”
End Sub

  1. Atribuição dos valores desejados ao SetPoint em tela

Sub ComboBox1_Click()
SELECT CASE Value
CASE “A”
Screen.Item(“Texto1”).Value = 1
CASE “B”
Screen.Item(“Texto1”).Value = 2
CASE “C”
Screen.Item(“Texto1”).Value = 3
CASE “D”
Screen.Item(“Texto1”).Value = 4
CASE “E”
Screen.Item(“Texto1”).Value = 5
CASE ELSE
Screen.Item(“Texto1”).Value = NULL
END SELECT
End Sub

Seria isto o desejado?

#3

Bom dia Gabriel,

Funcionou! Muito Obrigado.

Precisei também de acrescentar uma associação por tabela na propriedade Text da ComboBox para mostrar o texto selecionado quando fechado.

Está funcionando!