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 - Spostare il testo e far sparire il cursore lampeggiante.
Forum - Pascal - Spostare il testo e far sparire il cursore lampeggiante.

Avatar
Mak (Normal User)
Rookie


Messaggi: 23
Iscritto: 17/08/2008

Segnala al moderatore
Postato alle 17:55
Giovedì, 02/10/2008
Ciao a tutti, dopo un po' di pausa dal Pascal, rieccomi a usare questo linguaggio...
volevo chiedere:
1. Si può far sparire il cursore lampeggiante dai programmi? Io penso di sì, ma come?
2. Come posso spostare i testi? Se volessi mettere una frase al centro del video, cosa devo fare? (Nel linguaggio Basic si usa LOCATE + il numero della riga e il numero della colonna).. grazie in anticipo.

PM Quote
Avatar
WARRIOR (Ex-Member)
Guru


Messaggi: 627
Iscritto: 30/03/2007

Segnala al moderatore
Postato alle 19:22
Giovedì, 02/10/2008
Per quanto riguarda l'eliminazione del cursore, non credo si possa fare, anche perché non scordiamoci che siamo sempre in ambiente DOS.
Per spostare il cursore e quindi posizionare a tua scelta il testo devi usare la funzione:

Codice sorgente - presumibilmente Plain Text

  1. GotoXY(X,Y);



Dove X e Y sono la riga e la colonna.

PM Quote
Avatar
Progman-92 (Member)
Expert


Messaggi: 368
Iscritto: 16/12/2007

Segnala al moderatore
Postato alle 19:49
Giovedì, 02/10/2008
Riguardo al nascondere il cursore in console è sicuramente possibile tramite assembly, l'ho provato personalmente in un mio programma e funziona con Turbo Pascal 7.0, ma non con Free Pascal Compiler. Qui ci sono le due procedure per nascondere e visualizzare il cursore:
Codice sorgente - presumibilmente Delphi

  1. procedure NascondiCursore;assembler;
  2. asm
  3. mov ax, $0100;
  4. mov cx, $2808;
  5. int $10;
  6. end;
  7.  
  8. procedure MostraCursore;assembler;
  9. asm
  10. mov ax, $0100;
  11. mov cx, $0808;
  12. int $10;
  13. end;



:k::k::k:

Ultima modifica effettuata da Progman-92 il 02/10/2008 alle 19:52
PM Quote
Avatar
Mak (Normal User)
Rookie


Messaggi: 23
Iscritto: 17/08/2008

Segnala al moderatore
Postato alle 14:24
Venerdì, 03/10/2008
Perfetto, grazie a tutti :k:

PM Quote