Alex (Ex-Member)
Expert
Messaggi: 441
Iscritto: 15/08/2005
|
ciao a tutti...
sto progettando pacman in pascal e volevo stampare una variabile che contiene il punteggio in modalità grafica...l'ho convertita in stringa con str ma sullo schermo mi compare dei quadratini e basta...niente numeri....come posso fare?
|
|
Phi (Member)
Expert
Messaggi: 241
Iscritto: 30/12/2009
|
Attento : Avresti dovuto postare un codice sorgente
Cosa intenti per modalita grafica ?? Usando la unit Graph ??
Se è così questo codice visualizza sullo schermo un numero:
Codice sorgente - presumibilmente Delphi |
program forum; uses graph; const g1 : smallint = VGA; g2 : smallint = 2; var s : string; n : integer; BEGIN initgraph(g1,g2,''); n := 2445; str(n,s); outtextxy(1,1,s); readln; END.
|
|
|
Alex (Ex-Member)
Expert
Messaggi: 441
Iscritto: 15/08/2005
|
scusami per il codice...cmq si..la unit graph...
ho fatto la stessa identica cosa..(a parte per l'inizializzazione della grafica:
Codice sorgente - presumibilmente Pascal |
var modo,grafica,n:integer; s:string; begin modo:=detect; grafica:=detect; initgraph(modo,grafica,'c:/tp/bgi/'); n:=1234; str(n,s); outtextxy(1,1,s); closegraph; end.
|
|
|
Poggi Marco (Member)
Guru
Messaggi: 969
Iscritto: 05/01/2010
|
Non so che dirti :
Ho provato il programma, e funziona.
Che sistema oprrativo e idee pascal usi?
|
|
Alex (Ex-Member)
Expert
Messaggi: 441
Iscritto: 15/08/2005
|
uso win xp e il vecchio borland pascal.....magari provo con lazarus se riesco a farlo partire=)
|
|
Poggi Marco (Member)
Guru
Messaggi: 969
Iscritto: 05/01/2010
|
Ultima modifica effettuata da Poggi Marco il 21/06/2010 alle 22:00 |
|
Phi (Member)
Expert
Messaggi: 241
Iscritto: 30/12/2009
|
Io il testo funzionante che ho postato l'ho editato con Free Pascal.
Ma su Lazarus dovrebbe essere uguale. Unit e Compilatore sono gli stessi.
|
|
Alex (Ex-Member)
Expert
Messaggi: 441
Iscritto: 15/08/2005
|
il fatto è che lazarus ha un casino di pulsanti e pulsantini...prima dovrei studiarmelo un pò..cmq ho provato e mi da un sacco di errori...in seguito ne posterò un pò...invece con il borland basta cliccare su compile e il gioco è fatto...
adesso provo con free pascal...
grazie mille a tutti=)
chissa xk però con il borland non va...(ho provato a stampare anche una sola stringa composta da caratteri e va...se sono numeri no...)
Ultima modifica effettuata da Alex il 21/06/2010 alle 22:18 |
|
Alex (Ex-Member)
Expert
Messaggi: 441
Iscritto: 15/08/2005
|
ecco qui..anche con il free pascal stessa musica..
pac_man.pas(322,1) Error: Undefined symbol: GRAFPAC_DISEGNA$SMALLINT$SMALLINT$SMALLINT
pac_man.pas(322,1) Error: Undefined symbol: GRAFPAC_DISFANT$SMALLINT$SMALLINT$SMALLINT
pac_man.pas(322,1) Fatal: There were 2 errors compiling module, stopping
pac_man.pas(0) Fatal: Compilation aborted
xk con il borland non ho tutti sti problemi?
|
|