Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Pascal - menù
Forum - Pascal - menù

Avatar
luca95 (Normal User)
Rookie


Messaggi: 47
Iscritto: 20/02/2011

Segnala al moderatore
Postato alle 18:16
Venerdì, 25/02/2011
So che ormai non ne potrete già più di me e le mie domande ma volevo sapere come faccio a collegare diversi programmi tra di loro; per esempio: si parte da un menù con varie opzioni e dopo aver fatto la propria scelta passare ad un'altro programma sempre fatto in pascal. Come si può fare? :)

PM Quote
Avatar
a_butta (Member)
Expert


Messaggi: 578
Iscritto: 16/03/2010

Segnala al moderatore
Postato alle 20:52
Venerdì, 25/02/2011
Per passare da un programma all'altro tu intendi aprire un eseguibile (.exe) indipendente dal primo? In questo caso devi avviarlo da shell con la dicitura:
exec('programma2.exe','open') (dovrebbe essere questa, comunque basta una velocissima ricerca su google per trovare la risposta giusta)...

PS: due cose: 1) il titolo non c'entra nulla. 2) Se è quello che ho scritto io, ripeto, bastava anche google per risolvere il problema :yup:

PM Quote
Avatar
Poggi Marco (Member)
Guru


Messaggi: 969
Iscritto: 05/01/2010

Segnala al moderatore
Postato alle 21:42
Venerdì, 25/02/2011
Ciao!

La tua domanda è davvero interessante!
Prova a dare un occhiata qua :http://www.pierotofy.it/pages/guide/Guida_Pascal/Scrivere_ ...

PM Quote
Avatar
luca95 (Normal User)
Rookie


Messaggi: 47
Iscritto: 20/02/2011

Segnala al moderatore
Postato alle 14:08
Sabato, 26/02/2011
quindi in sostanza io dovrei creare una libreria dove scrivo il mio programma e poi richiamare la libreria nel programma principale?? e poi ho un altro problema, avevo fatto delle domande su come spostarsi nello schermo durante l'esecuzione del programma e questa discussione non si chiama menù per niente perché ho un problema con un menù:
Codice sorgente - presumibilmente Delphi
  1. program menu;
  2. uses crt;
  3.  
  4. procedure creazione;
  5. var t:char;
  6. var x,y:shortint;
  7. var a:boolean;
  8. Begin
  9.   gotoxy(34,3);
  10.   write('> PLAY GAME');
  11.   gotoxy(34,6);
  12.   write('> ISTRUZIONI');
  13.   gotoxy(34,9);
  14.   write('> INFO');
  15.   gotoxy(34,12);
  16.   write('> OPZIONI');
  17.   x:=33;
  18.   y:=3;
  19.   gotoxy(x,y);
  20.   write('-');
  21.   repeat
  22.     t:=chr(0);
  23.     while (t=chr(0)) do t:=readkey;
  24.     if ord(t)=72 then
  25.       Begin
  26.         gotoxy(x, y);
  27.         write(' ');
  28.         y:=y-3;
  29.         if y<3 then y:=12;
  30.         gotoxy(x, y);
  31.         write('-');
  32.       End
  33.                  else
  34.       if ord(t)=80 then
  35.         Begin
  36.           gotoxy(x, y);
  37.           write(' ');
  38.           y:=y+3;
  39.           if y>12 then y:=3;
  40.             gotoxy(x, y);
  41.             write('-');
  42.         End
  43.                 else
  44.     if ord(t)=13 then
  45.       a:=true;
  46.   until a=true;
  47. End;
  48.  
  49. Begin
  50.   clrscr;
  51.   creazione;
  52. End.

questo è il "menù" di un giochino che volevo fare però ho dei problemi perché quando devo far muovere la lineetta di fianco alle scritte mi si chiude il programma e non capisco perché e poi se mi potreste dire come richiamare la libreria nel programma principale mi fareste un grandissimo favore :D

Ultima modifica effettuata da luca95 il 26/02/2011 alle 14:09
PM Quote
Avatar
Poggi Marco (Member)
Guru


Messaggi: 969
Iscritto: 05/01/2010

Segnala al moderatore
Postato alle 14:51
Sabato, 26/02/2011
Ho letto il programma, e ho notato che la variabile a non è stata inizializzata prima di entrare nel ciclo.

Per quanto riguarda le librerie, prova a scriverne una seguendo l' esempio della guida e compilala.
Quindi nel programma, alla sezione uses, aggiungi il nome della libreria.

PM Quote