[TurboPascal] [retour chariot]
Fermé
charles
-
10 juin 2005 à 16:20
sebsauvage Messages postés 32893 Date d'inscription mercredi 29 août 2001 Statut Modérateur Dernière intervention 21 octobre 2019 - 11 juin 2005 à 18:47
sebsauvage Messages postés 32893 Date d'inscription mercredi 29 août 2001 Statut Modérateur Dernière intervention 21 octobre 2019 - 11 juin 2005 à 18:47
A voir également:
- [TurboPascal] [retour chariot]
- Retour chariot excel - Guide
- Raccourci clavier retour en arrière - Guide
- Retour à la ligne google sheet ✓ - Forum Bureautique
- Echo retour à la ligne ✓ - Forum Shell
- Retour à la ligne css - Forum CSS
8 réponses
sebsauvage
Messages postés
32893
Date d'inscription
mercredi 29 août 2001
Statut
Modérateur
Dernière intervention
21 octobre 2019
15 655
10 juin 2005 à 16:21
10 juin 2005 à 16:21
writeln(), non ?
ce que je veux,c'est que tantque j'ai pas saisie un nombre entre 1 et trois le curseur reste sur place!
voila ce que j'ai utilisé :
reapet
readln(codechambre.etage);
if ioresult=0 then ok:=true else ok:=false;
if ok and(codechambre.etage)<1 or (codechambre.etage>3))
then ok:=false;
if not ok then
gotoxy(33,19);
until ok;
mais a la compilation quan le curseur se positionne au niveau du readln quand j'apui sur la touche entrer le curseur va ala ligne sans se soucier du gotoxy(33,19);
alors que je veux qu'il va ala ligne19 colonne 33
oubien qu'il ne bouge pas.
comment puije gerer cela
merci
voila ce que j'ai utilisé :
reapet
readln(codechambre.etage);
if ioresult=0 then ok:=true else ok:=false;
if ok and(codechambre.etage)<1 or (codechambre.etage>3))
then ok:=false;
if not ok then
gotoxy(33,19);
until ok;
mais a la compilation quan le curseur se positionne au niveau du readln quand j'apui sur la touche entrer le curseur va ala ligne sans se soucier du gotoxy(33,19);
alors que je veux qu'il va ala ligne19 colonne 33
oubien qu'il ne bouge pas.
comment puije gerer cela
merci
sebsauvage
Messages postés
32893
Date d'inscription
mercredi 29 août 2001
Statut
Modérateur
Dernière intervention
21 octobre 2019
15 655
10 juin 2005 à 17:11
10 juin 2005 à 17:11
Je n'ai pas assez pratiqué TurboPascal pour me rappeller s'il existe une unité pour gérer le mode texte (curseur, couleurs...).
Quelqu'un a une idée ?
Les séquences d'échappement ANSI peut-être ?
Quelqu'un a une idée ?
Les séquences d'échappement ANSI peut-être ?
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
sebsauvage
Messages postés
32893
Date d'inscription
mercredi 29 août 2001
Statut
Modérateur
Dernière intervention
21 octobre 2019
15 655
10 juin 2005 à 22:11
10 juin 2005 à 22:11
ça servait beaucoup en MS-Dos avant pour changer les couleurs et déplacer le curseur.
Il suffisait d'envoyer une suite de caractères particulière, et on déplaçait le curseur, etc.
Il suffisait d'envoyer une suite de caractères particulière, et on déplaçait le curseur, etc.
sebsauvage
Messages postés
32893
Date d'inscription
mercredi 29 août 2001
Statut
Modérateur
Dernière intervention
21 octobre 2019
15 655
11 juin 2005 à 12:36
11 juin 2005 à 12:36
Je ne sais pas si c'est encore présent dans les nouvelles versions de Windows, mais on peut essayer:
Un petit coup de Google:
http://www.bluesock.org/~willg/dev/ansi.html
http://www.isthe.com/chongo/tech/comp/ansi_escapes.html
http://www.delmar.edu/Courses/CIS415L/ANSIsys.htm
...
Un petit coup de Google:
http://www.bluesock.org/~willg/dev/ansi.html
http://www.isthe.com/chongo/tech/comp/ansi_escapes.html
http://www.delmar.edu/Courses/CIS415L/ANSIsys.htm
...
sam3000
Messages postés
1225
Date d'inscription
mercredi 22 décembre 2004
Statut
Membre
Dernière intervention
13 juin 2005
144
11 juin 2005 à 16:58
11 juin 2005 à 16:58
salut,
tu devrais faire ça:
pour la gestion de l'ecran, couleurs, curseurs... dans turbo pascal, il y a l'unité crt.tpu, tu doit l'ajouter au début de ton programme:
les fonctions disponibles sont plusieurs, dont:
J'espère que ça aidera!
tu devrais faire ça:
repeat gotoxy(33,19); read(codechambre.etage); if ioresult=0 then ok:=true else ok:=false; if ok and(codechambre.etage)<1 or (codechambre.etage>3)) then ok:=false; until ok;
pour la gestion de l'ecran, couleurs, curseurs... dans turbo pascal, il y a l'unité crt.tpu, tu doit l'ajouter au début de ton programme:
uses crt;
les fonctions disponibles sont plusieurs, dont:
clrscr; {efface l'ecran}
gotoxy(x,y); {positionner le curseur}
x:=wherex; {déterminer la postion du curseur x,y}
y:=wherey;
textcolor(c); {fixer une couleur pour le texte}
textbackground(c); {fixer une couleur pour l'arriere plan}
textattr:=a; {fixer les attributs de texte couleurs, clignotement,...}
textmode(m); {mode d'affichage, ecran 80x50...}
J'espère que ça aidera!
sebsauvage
Messages postés
32893
Date d'inscription
mercredi 29 août 2001
Statut
Modérateur
Dernière intervention
21 octobre 2019
15 655
11 juin 2005 à 18:47
11 juin 2005 à 18:47
Ah merci sam3000, je ne me rappelais plus si ça existait sous TP.
