TEXTMODE |
Mode texte |
|---|---|
| Turbo Pascal 2+ | Crt |
Syntaxe
| Procedure TextMode(md:Integer); |
Paramètres
| Nom | Description | ||
|---|---|---|---|
| md | Ce paramètre permet d'indiquer le mode vidéo : | ||
| Constante | Valeur | Description | |
| BW40 | 0 | Cette constante permet d'indiquer le mode vidéo d'écran texte de 40x25 en noir et blanc | |
| C40 | 1 | Cette constante permet d'indiquer le mode vidéo d'écran texte de 40x25 en couleur | |
| BW80 | 2 | Cette constante permet d'indiquer le mode vidéo d'écran texte de 80x25 en noir et blanc | |
| C80 | 3 | Cette constante permet d'indiquer le mode vidéo d'écran texte de 80x25 en couleur | |
| Mono | 7 | Cette constante permet d'indiquer le mode vidéo d'écran texte de 80x25 en monochrome. Cette constante est disponible à partir de Turbo Pascal 4. | |
| Font8x8 | 256 | Cette constante permet d'indiquer le mode vidéo d'écran texte en EGA/VGA 43 et 50 lignes. Cette constante est disponible à partir de Turbo Pascal 4. | |
Description
Cette procédure permet de changer le mode d'écran de texte courant.
Remarques
- ATTENTION ! Il ne faut pas oublier de télécharger la mise-à-jour de l'unité Crt de Borland car une division par 0 se produit avec des machines avec un microprocesseur de 2 GHz ou plus.
- Dans les version Turbo Pascal 2 et Turbo Pascal 3, il n'était pas nécessaire d'inclure l'unité Crt, car TextMode faisait partie des parties des procédures intégré au compilateur Turbo Pascal.
- Lorsque la procédure TextMode est appelé, la fenêtre actuelle est réinitialisée sur tout l'écran, DirectVideo est défini sur True, CheckSnow est défini sur True si un mode couleur a été sélectionné, l'attribut de texte actuel est réinitialisé sur le normal correspondant à un appel à NormVideo, et la vidéo actuelle est entreposée dans LastMode. De plus, LastMode est initialisé au démarrage du programme en mode vidéo alors actif.
- La spécification de TextMode (LastMode) entraîne la resélection du dernier mode texte actif. Cette situation est utile lorsque vous souhaitez revenir en mode texte après avoir utilisé un paquet graphique, tel que Graph ou Graph3.
- L'appel suivant à la procédure TextMode :
- Si votre système est en mode 43 ou 50 lignes lorsque vous chargez un programme Turbo Pascal, le mode sera conservé par le code de démarrage de l'unité Crt, et la variable de fenêtre gardant la trace du nombre maximum de lignes à l'écran (WindMax) sera initialisé correctement.
- Voici comment écrire un programme restaurant le mode vidéo à son état d'origine :
- Notez que TextMode ne prend pas en charge les modes graphiques et que TextMode(OrigMode) ne restaurera donc que les modes pris en charge par TextMode.
TextMode(C80 + Font8x8);
réinitialisera l'affichage en 43 lignes et 80 colonnes sur une carte vidéo EGA, ou 50 lignes et 80 colonnes sur une carte vidéo VGA avec un moniteur couleur. L'instruction TextMode(Lo(LastMode)) désactive toujours le mode 43 ou 50 lignes et réinitialise l'affichage (bien qu'il laisse le mode vidéo inchangé); tandis que TextMode(Lo(LastMode)+Font8x8) conservera le même mode vidéo, mais réinitialisera l'affichage en 43 ou 50 lignes.
Références
Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 434 à 435.
Dernière mise à jour : Dimanche, le 8 février 2015