Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions

WRITE	Écriture
Delphi/Kylix/Lazarus	System

Syntaxe

Procedure Write([var fich:File,]var1,var2,...);

Procedure Write(Expr:Width:Precision;...);

Procedure Write([var f:TextFile,]Expr:Width:Precision,...);

Paramètres

Nom	Description
fich	Ce paramètre permet d'indiquer l'identificateur de fichier.
f	Ce paramètre permet d'indiquer l'identificateur de fichier de format texte.
var1, var2	Ce paramètre permet d'indiquer des variables ou du texte à afficher.
Expr	Ce paramètre permet d'indiquer une expression.
Width	Ce paramètre permet d'indiquer la largeur.
Precision	Ce paramètre permet d'indiquer la précision.

Description

Cette procédure permet d'écrire différentes données sur un périphérique, dans un fichier ou sur la console.

Remarques

La procédure Write écrit du texte ou d'autres valeurs dans un fichier. Si vous écrivez dans un fichier binaire, vous devez fournir une variable du même type que le type de base du fichier. Vous pouvez écrire plusieurs enregistrements en répertoriant plusieurs variables comme paramètre de la procédure Write.
Lors de l'écriture dans un TextFile, vous pouvez écrire des chaînes de caractères, des nombres, des caractères et des valeurs booléennes. Chaque valeur peut être suivie des expressions Width et Precision, séparées par des deux-points. Le Width et Precision peuvent être n'importe quelle expression entière. Le Width spécifie la taille minimale de la représentation sous forme de chaîne de caractères de Expr, et Precision spécifie le nombre de places après la virgule décimale du nombre à virgule flottante.
La procédure Write utilise autant de caractères que nécessaire, donc Width est juste la largeur minimale suggérée. Si le nombre nécessite moins de Width caractères, Write remplit la chaîne de caractères gauche avec des espaces.
Si vous ne fournissez pas de Width, le Delphi utilise 1 comme largeur minimale pour les entiers et affiche les nombres à virgule flottante sous la forme de 26 caractères sous la format suivante :

'-1.12345678901234567E+1234'

Si Expr est un nombre à virgule flottante, Write réduit le nombre de décimales pour adapter la valeur dans une chaîne de caractères utilisant au plus les caractères Width, Write utilise toujours au moins un chiffre après la décimale. Vous pouvez également fournir une Precision, indiquant à Write le nombre de décimales à utiliser après la virgule décimale. Si vous fournissez une Precision, Write utilise la notation à virgule fixe au lieu de la notation exponentielle.

Si le fichier n'a pas été attribué, Write signale l'erreur d'entrée/sortie 102.
Si le fichier n'est pas ouvert pour l'accès en écriture, Write signale l'erreur d'entrée/sortie 104.
Lorsque l'écriture échoue parce que le disque est plein, Write signale parfois l'erreur Error_Disk_Full (112) de Windows; parfois, il signale une erreur d'entrée/sortie 101.
Si aucun fichier n'est donné comme premier paramètre, Write écrit dans le fichier texte Output.
La procédure Str fait la même chose que Write, sauf qu'elle écrit une seule valeur dans une chaîne de caractères au lieu d'un fichier.

Exemple

Voici divers exemple d'affichages :


				
Program WriteSamples;

 
{$APPTYPE CONSOLE}

Uses SysUtils;


     

BEGIN

 Write('ABCDEF');

 Write('GHI');


 Write('JKL');

 WriteLn('MNOP');

 Write('QRS');


END.

on obtiendra le résultat suivant :

ABCDEFGHIJKLMNOP QRS

Voir également

Dernière mise à jour : Mercredi, le 18 février 2015

Section courante

A propos

Section administrative du site

WRITE