SoloCodigo

Programación General => Pascal => Mensaje iniciado por: kemer0 en Domingo 15 de Octubre de 2006, 05:45

Título: Ayuda Plis!
Publicado por: kemer0 en Domingo 15 de Octubre de 2006, 05:45
Buenas Noches..
 Y antes que nada me presento, mi nombre es matias y soy nuevo en el foro.

Tengo una dudilla, estoy haciendo un trabajo en pascal, y usando la sentencia IF , e echo algunas opciones. Pero al ingresar en un menu secundario quiero poner en este la opcion de VOLVER AL MENU PRINCIPAL y no tengo ni ideas de como hacerlo.
 Desde ya y por antemano muchas gracias!
Título: Re: Ayuda Plis!
Publicado por: lencho en Domingo 15 de Octubre de 2006, 05:49
la verdar no te entiendo muy bien. !!!!
explicate un poco mas.
Título: Re: Ayuda Plis!
Publicado por: kemer0 en Domingo 15 de Octubre de 2006, 06:15
Yo tengo un programa que es como un CANCIONERO

al iniciarlo en pantalla aparece lo siguiente



Bienvenido al cancionero

Los artistas son:

1- Shakira
2- Mana
3- etc etc ( siguen las opciones)


Cuando yo selecciono uno entro digamos a un segundo MENU que me da estas opciones:

1-Discografia
2- Letras de canciones
3-VOLVER

Pero no se como realizar la opcion 3 de volver al menu anterior y que me muestre los artistas nuevamente.


Saludos y espero que ahora me entiendan!
Título: Re: Ayuda Plis!
Publicado por: Enko en Domingo 15 de Octubre de 2006, 16:14
Código: Text
  1.  
  2.   //menu principal
  3.   repeat
  4.   case option of
  5.   menu1:
  6.       repeat
  7.          case optionMenu1 of
  8.             subMenu1:
  9.             subMenu2:
  10.             subMenu3:
  11.       until optionMenu1='salir'
  12.   menu2:
  13.   menu3:
  14.   until option = 'salir'
  15.  
  16.  
Simpelemente al selecciona un menu, entras en un bucle nuevo, del cual sales unicamente seleccionando la opcion de salir. Cuando sales de ese bucle, vuelves a principal, del cual saldrias unicamente con la opcion de salir del menu principal.
Título: Re: Ayuda Plis!
Publicado por: Saiyan1 en Domingo 15 de Octubre de 2006, 17:09
Una pregunta Enko...
para que sea posible el poner

Código: Text
  1. until OptionMenu ='salir';
  2.  

como haces?

creando una lista enumerada?
ej:

Código: Text
  1. OptionMenu = (Shakira, Sanz, Arjona, Salir);
  2.  

??
Título: Re: Ayuda Plis!
Publicado por: lencho en Lunes 16 de Octubre de 2006, 01:29
lo que pasa es en el segundo repeat se modifica la variable OPTIONMENU1, donde sus opciones son :
        1. Discografia
        2- Letras de canciones
        3- VOLVER
y cuando presione 3 entonces saldria del segundo repeat a mostrar el menu:
        1- Shakira
        2- Mana
        3- etc etc ( siguen las opciones)
y aqui en este repeat (EL PRIMERO), la variable que se modifica es OPTION.
Título: Re: Ayuda Plis!
Publicado por: Enko en Lunes 16 de Octubre de 2006, 15:30
mas bien lo que habia escrito es una especie de pseudocodigo, un ejemplo generico que no se compila.
Aclaro un poco las cosas.
Código: Text
  1.  
  2. const
  3.   menu1 = 1;
  4.   menu2 = 2;
  5.   subMenu1 = 1;
  6.   subMenu2 = 2;
  7.   SALIR   =   10;
  8. // o tabmien se podria hacer
  9. var
  10.    menu = (menu1 = 1, menu2, menu3);
  11. {pero de este modo habria que usar Ord(menu) donde menu1 = 1; menu2 = 2...}
  12. //menu principal
  13.  repeat
  14.  WriteLine(Todas las opciones del Menu);
  15.  //integer, o byte, supongo que da lo mismo
  16.  ReadLn(Option1);
  17.  case option of
  18.  menu1:
  19.      repeat
  20.        WriteLn(Opciones del submenu1);
  21.        Readln(optionmenu1);
  22.         case optionMenu1 of
  23.            subMenu1:
  24.            subMenu2:
  25.            subMenu3:
  26.      until optionMenu1=SALIR
  27.  menu2:
  28.  menu3:
  29.  until option = SALIR
  30.  
  31.