Langage de programmation - Turbo Pascal - Référence de procédures et de fonctions

WHEREX	Où est le X ?
Turbo Pascal 3+	Crt

Function WhereX:Byte;

Cette fonction retourne la coordonnée horizontal texte courante dans l'écran de texte.

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.

Voici un exemple permet de l'utilisation de cette fonction :


				
Program WhereXSamples;

     

Uses Crt;

     


BEGIN

 GotoXY(10,3);

 WriteLn('Where X = ',WhereX);


END.

on obtiendra le résultat suivant afficher sur la troisième ligne en dixième colonnes :

Where X = 10

Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 449.

Dernière mise à jour : Dimanche, le 8 février 2015

Section courante