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

FAQ PascalConsultez toutes les FAQ

Nombre d'auteurs : 10, nombre de questions : 402, dernière mise à jour : 7 janvier 2018  Ajouter une question

 

Bienvenue dans la F.A.Q. Pascal !

Celle-ci rassemble les réponses aux questions les plus fréquemment posées sur le langage Pascal et tous ses outils de programmation. Si elle n'a pas pour vocation de répondre à toutes les interrogations possibles, elle reste une bonne base de connaissances sur le Pascal, et ne demande qu'à être enrichie par vos expériences personnelles.

Nous vous invitons à proposer vos propres questions/réponses directement dans la FAQ ou, si vous souhaitez apporter une modification à une question/réponse existante, à la poster dans le fil de discussion renseigné ci-dessous.

Nous vous souhaitons une bonne lecture !

L'équipe Pascal.

SommaireLes différents compilateursTurbo PascalUnités et bibliothèques spécifiques (4)
précédent sommaire suivant
 

Pour formater une chaîne de caractères, à la manière de printf du C, on peut utiliser la procédure FormatStr de l'unité Drivers sous Turbo Pascal. Pour ceux qui ne disposent pas de cette unité, le code source de la procédure Format est disponible en téléchargement ci-dessous.

Voici un exemple d'utilisation de FormatStr :

Code delphi : Sélectionner tout
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
  
Program LECTFICH; 
  
Uses Drivers; 
  
Const Gabarit = 'Erreur %08d dans le fichier %s'; 
  
Var NomFichier : String; 
  
    ... 
  
    Erreur : Array [0..1] of LongInt; 
    MessageErreur : String; 
  
Begin 
  NomFichier := 'E:\Temp\Donnees.dta'; 
  
  ... 
  
  { Lecture du fichier } 
  Resultat := IOResult; 
  if Resultat <> 0 
     then 
       begin 
         Erreur [0] := Resultat; 
         Erreur [1] := LongInt(@NomFichier); 
         FormatStr(MessageErreur,Gabarit,Erreur); 
         WriteLn(MessageErreur); 
       end; 
  
  ... 
  
End.
Dans cet exemple, on définit un gabarit de message d'erreur contenant deux paramètres de formatage :
  • %08d, qui reçoit un nombre décimal à afficher sur 8 caractères en comblant les espaces par des 0 ;
  • %s, qui reçoit une chaîne de caractères.

Ces deux paramètres sont fournis à la procédure FormatStr sous forme d'un tableau de deux entiers longs, contenant respectivement le nombre et l'adresse de la chaîne à afficher.

Mis à jour le 5 juin 2004 Alcatîz Eric Sigoillot

Les noms de fichiers longs sont apparus avec Windows 95. Turbo Pascal ne sait donc naturellement pas les gérer. Néanmoins, il est possible de créer une gestion pour ceux-ci. Le plus simple reste de faire appel à une unité extérieure. Il en existe plusieurs se chargeant très bien de cette tâche sur Internet. La plus complète est peut-être Dos70.pas, de Cristi Streng.

Mis à jour le 7 mars 2004 Alcatîz Eric Sigoillot

L'utilisation de l'unité Graph, fournie avec Turbo Pascal, permet au mieux d'atteindre une résolution de 640x480 en 16 couleurs. Pour dépasser cette limitation d'un autre temps, il est possible d'utiliser les modes VESA.
Ces modes permettent d'atteindre une résolution de 1600x1200 en millions de couleurs, en fonction de la carte graphique installée. Turbo Pascal ne sachant pas les gérer nativement, il vous faudra soit créer votre propre unité de gestion, soit utiliser une unité faite par un autre utilisateur.

Les membres du forum ont plébiscité l'unité Vbe2, d'Eric Sigoillot, qui permet d'utiliser le même type de programmation qu'avec la BGI. La compatibilité est quasi parfaite, et vous pourrez convertir vos vieux programmes en 16 couleurs en un rien de temps !

Mis à jour le 6 mars 2004 Eric Sigoillot

Pour répondre de manière simple : non, il n'est pas possible d'utiliser une imprimante USB avec un programme Turbo Pascal.
Bien entendu, ces propos sont à nuancer. En réalité, ceci est possible, mais au prix d'efforts démesurés devant la tâche à accomplir. En effet, il faut comprendre que le protocole USB n'est apparu que bien après la sortie de Turbo Pascal, qui ne le gère donc absolument pas.
Pour utiliser une imprimante USB, il convient auparavant de gérer tout le protocole USB, ce qui représente une masse de travail non négligeable, après quoi il faudra connaître le protocole de communication exigé par l'imprimante. Autant y renoncer.

Les plus acharnés pourront toujours regarder le code ci-dessous, destiné à gérer le protocole USB 1.1.

Mis à jour le 10 mai 2005 Eric Sigoillot

Proposer une nouvelle réponse sur la FAQ

Ce n'est pas l'endroit pour poser des questions, allez plutôt sur le forum de la rubrique pour ça


Réponse à la question

Liens sous la question
précédent sommaire suivant
 

Les sources présentées sur cette page sont libres de droits et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation constitue une œuvre intellectuelle protégée par les droits d'auteur. Copyright © 2024 Developpez Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site et de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.