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)
UMA MÃOZINHA COM O "MENU TO"
Moderador: Moderadores
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
EndDaniel
Harbour + Minigui + dbfcdx
Marinas-Gui Pena que parou o suporte
Harbour + Minigui + dbfcdx
Marinas-Gui Pena que parou o suporte
Valeu !!!
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)
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)

