Discussion :

[dimi2]

Bonjour,

Existe-t-il une manière de centrer les lignes affichées à l'exécution sans jouer sur les espaces en début de ligne de programmation, comme dans l'exemple suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
printeln('                                           Bonjour');

Merci

[Alcatîz]

Bonjour !

Avec l'unité WinCRT, tu peux déplacer le curseur avec CursorTo ou GotoXY. La largeur de la fenêtre (en caractères) se trouve dans la variable prédéfinie ScreenSize.X; à partir du moment où tu connais la longueur de la chaîne à afficher, le calcul est simple : tu dois déplacer le curseur à l'abscisse ((ScreenSize.X - Longueur_Chaine) div 2).

Pour terminer par un message publicitaire, tu peux trouver quelques détails sur l'unité WinCRT ici :
http://alcatiz.developpez.com/tutori...page=pg_wincrt

[dimi2]

Bonjour,
Merci pour votre aide ; merci aussi pour les adresses utiles que vous me signalez.

[dimi2]

Bonsoir,
J'ai essayé les deux possibilités :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
CursorTo(100,100);

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
GotoXY(100,100);

Toutes deux déplacent l'affichage verticalement, mais horizontalement le texte reste collé à la marge gauche. Je n'ai pas su utiliser les deux procédures ?

[Loceka]

Il faut d'abord positionner ton curseur à l'écran avec gotoXY(x, y) puis écrire ton texte :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
gotoXY(10, 2);
wirte("test");

[krachik]

Bonjour

@dimi2 Il faut penser à ne pas oublier que les données que tu passeras à tes 2 fonctions (cursorTo ou gotoXY ) ne doivent pas dépassers les dimensions de ton écran d'éxecution(80x25) ,sinon tu obtiendras ce que tu dis plus haut

Cordialement

[dimi2]

Bonjour,
Merci pour vos réponses. Je jour où je trouverai un bouquin qui ne cache rien de l'emploi des fonctions et procédures, je serai moins nul...
Dans l'écriture de mon petit programme, c'est dingue le nombre de problèmes que j'ai rencontrés. Sans l'aide de ce forum, ce serait mission impossible !
Merci encore.

[Transgarp]

J'ai acheté BP7 de Borland en 1992, alors j'ai 3 bouquins très utile qui va avec ca

- Borland Pascal with objects, Programmer's Reference
- Borland Pascal with objects, Language Guide
- Borland Pascal with objects, User Guide

Programmer en Pascal sans bouquin, je n'y pense même pas. Bien sur il y a le help des commandes quand on actionne le logiciel, mais je trouve la recherche d'infos dans un livre beaucoup plus rapide.

[dimi2]

Je me rends compte chaque jour combien ce que vous dites est vrai !!!