FAQ PascalConsultez toutes les FAQ

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 :

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.

• %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.
  

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.

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 !

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.