Página 1 de 1

UMA MÃOZINHA COM O "MENU TO"

Enviado: 19 Jul 2005 01:48
por Darlan
Aí Galera !!

Não sei como posso me embananar com as coisas mais simples...
Depois do sistema estar 99% pronto, estou pedalando com o MENU TO...
Alguém sabe como posicionar o prompt do menu to ?
Ex: quando retornar ao menu eu quero que fique marcada(posicionada)
na 3 opção e não na primeira... Obs.: estou retornando com um
ESCAPE (27)... O caso é que o MENU TO não obedece direito... as vezes
fica na opção 2 ou 4... Já tentei de tudo... usei o KEYBOARD CHR() para
pular uma opção a direita ou esquerda, mas não anda mais que 1 opção...

Desde já, agradeço a força !!! Essa é vergonhosa...

Darlan (Mafra-SC)

Enviado: 19 Jul 2005 08:21
por Daniel
Darlan fica assim

Código: Selecionar todos

op:= 3 // vc declara a variavel com o valor 3
While .t.
     @ 10, 20 Say '1-> Opcao 1'
     @ 11, 20 Say '2-> Opcao 2'
     @ 12, 20 Say '3-> Opcao 3'
     @ 14, 20 Say '4-> Opcao 4'
     Menu To op
     If op == 1
        teste()
     Elseif op == 2
        teste1()
     ElseIf op == 3
        teste2()
     ElseIf op == 4
        teste3()
     Else
        Exit
     EndIf
     op:= 3 // aki volta para possicao 3 de novo
End

Valeu !!!

Enviado: 19 Jul 2005 20:13
por Darlan
Beleza Daniel !!!

Deu na pinta !!! Funcionou 10 !!!

Eu já estava enjoado de tanto keyboard chr() espalhado
nos meus prgs... :)))

Fico te devendo essa !!!

UM ABRAÇO !!!

Darlan (Mafra-SC)