Tenho o seguinte código:
Código: Selecionar todos
aOPCOES := {}
AADD(aOPCOES, "SIM")
AADD(aOPCOES, "NAO")
nOPCAO = ACHOICE(03,08,03,10)
cATIVO = nOPCAO
Como retornar o valor um item de um array?
Moderador: Moderadores
-
labaroazul
- Usuário Nível 2
- Mensagens: 83
- Registrado em: 26 Fev 2008 14:52
- Localização: São Paulo - SP
- Contato:
Como retornar o valor um item de um array?
Boa tarde, amigos!
Tenho o seguinte código:
Na linha "cATIVO = nOPCAO", em vez de obter o número correspondente à opção que eu selecionei no array, eu gostaria de obter os valores "SIM" ou "NAO". Como faço isso?
Tenho o seguinte código:
Windows XP Professional + Clipper 5.2e + Exospace + Dbase III Plus + SIX3 + NoDosImp + LXPic
"O trabalho afasta três males: o vício, a pobreza e o tédio." (Voltaire)
Site: http://www.labaroazul.xpg.com.br
Repositório: http://www.4shared.com/dir/31334106/e79 ... aring.html
"O trabalho afasta três males: o vício, a pobreza e o tédio." (Voltaire)
Site: http://www.labaroazul.xpg.com.br
Repositório: http://www.4shared.com/dir/31334106/e79 ... aring.html
Re: Como retornar o valor um item de um array?
Tente assim:
aopcoes := {'Sim', 'Nao'}
nOPCAO := ACHOICE(03,08,03,10)
if nopcao # 0
cATIVO := aopcaoes[nOPCAO]
end
Tb pode ser assim:
if alert('Confirma?', {'Sim', 'Nao'}) = 1
... <comandos>
end
Espero ter ajudado. Boa sorte.
aopcoes := {'Sim', 'Nao'}
nOPCAO := ACHOICE(03,08,03,10)
if nopcao # 0
cATIVO := aopcaoes[nOPCAO]
end
Tb pode ser assim:
if alert('Confirma?', {'Sim', 'Nao'}) = 1
... <comandos>
end
Espero ter ajudado. Boa sorte.
"TRS-80/Sincler/Apple/PC - Clipper Winter 85, tlink 1.0 [pc 10 MHz - 640K] {NEZ 8000 2Kb RAM}"
{POG - Programação Orientada a Gambiarra}
{POG - Programação Orientada a Gambiarra}