IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Turbo Pascal Discussion :

[TPW][Débutant] Centrer une ligne à l'écran


Sujet :

Turbo Pascal

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    143
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 143
    Par défaut [TPW][Débutant] Centrer une ligne à l'écran
    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

  2. #2
    Responsable Pascal, Lazarus et Assembleur


    Avatar de Alcatîz
    Homme Profil pro
    Ressources humaines
    Inscrit en
    Mars 2003
    Messages
    8 055
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : Belgique

    Informations professionnelles :
    Activité : Ressources humaines
    Secteur : Service public

    Informations forums :
    Inscription : Mars 2003
    Messages : 8 055
    Billets dans le blog
    2
    Par défaut
    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

    Règles du forum
    Cours et tutoriels Pascal, Delphi, Lazarus et Assembleur
    Avant de poser une question, consultez les FAQ Pascal, Delphi, Lazarus et Assembleur
    Mes tutoriels et sources Pascal

    Le problème en ce bas monde est que les imbéciles sont sûrs d'eux et fiers comme des coqs de basse cour, alors que les gens intelligents sont emplis de doute. [Bertrand Russell]
    La tolérance atteindra un tel niveau que les personnes intelligentes seront interdites de toute réflexion afin de ne pas offenser les imbéciles. [Fiodor Mikhaïlovitch Dostoïevski]

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    143
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 143
    Par défaut
    Bonjour,
    Merci pour votre aide ; merci aussi pour les adresses utiles que vous me signalez.

  4. #4
    Membre confirmé
    Profil pro
    Inscrit en
    Mars 2008
    Messages
    143
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2008
    Messages : 143
    Par défaut
    Bonsoir,
    J'ai essayé les deux possibilités :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    CursorTo(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 ?

  5. #5
    Membre Expert
    Avatar de Loceka
    Profil pro
    Inscrit en
    Mars 2004
    Messages
    2 276
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2004
    Messages : 2 276
    Par défaut
    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");

  6. #6
    Membre Expert
    Avatar de krachik
    Inscrit en
    Décembre 2004
    Messages
    1 964
    Détails du profil
    Informations forums :
    Inscription : Décembre 2004
    Messages : 1 964
    Par défaut
    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

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [VCL][TListView]Montrer une ligne à l'écran
    Par ptitbob dans le forum Delphi
    Réponses: 4
    Dernier message: 23/07/2007, 16h35
  2. Problème de débutant : Répéter une ligne
    Par Grelot dans le forum Access
    Réponses: 5
    Dernier message: 05/06/2007, 13h55
  3. [Interbase][Débutant] effacer une ligne séléctionnée
    Par Cthulhu_RLyeh dans le forum Bases de données
    Réponses: 5
    Dernier message: 02/05/2007, 13h10
  4. [débutant]déplacer une ligne dans CListCtrl
    Par mouss31 dans le forum MFC
    Réponses: 4
    Dernier message: 30/10/2006, 14h32
  5. [HTML][DEBUTANT] centrer une ligne de texte.
    Par heider dans le forum Balisage (X)HTML et validation W3C
    Réponses: 9
    Dernier message: 20/11/2005, 16h15

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo