Comando CHOOSE
O comando CHOOSE apresenta uma caixa de seleção com um título e os itens para ser selecionados. Se o utilizador selecionar um objeto, a variável cujo nome é fornecido será atualizada de modo a conter o número do objeto selecionado (um número inteiro, 1, 2, 3, ...) ou 0 se o utilizador tocar em
Sintaxe:
CHOOSE(var, "título", "item1", "item2",...,"itemn")
Exemplo:
EXPORT Escolha()
BEGIN
LOCAL op;
PRINT()
CHOOSE(op,"Selecione seu herói", "Euler", "Gauss", "Newton");
IF op==1 THEN
PRINT("Você selecionou Euler");
ELSE IF op==2 THEN
PRINT("Você selecionou Gauss");
ELSE
PRINT("Você selecionou Newton");
END;
END;
END;
E a tela de escolha resultante:
Ao se clicar em Gauss: