PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Imprimer un fichier externe
Imprimer un fichier externe
Débuté par cedric.leboucher, 25 avr. 2005 14:14 - 1 réponse
Posté le 25 avril 2005 - 14:14
Bonjour,

j'ai créé un fichier externe avec les commandes fOuvre, fEcritLigne et fFerme.
Maintenant je souhaiterais pouvoir l'imprimer après le fFerme.
Mais comment ? Merci de votre aide.
Posté le 25 avril 2005 - 19:11
Le principe: lire le fichier et se servir des instructions d'écriture. Le projet peut devenir un peu plus sophistiqué en utilisant une fenêtre de choix avec iconfigure imarge choix de iaperçu, choix de la police, etc...

Numéro_Fichier est un entier
lignelue est une chaîne
Numéro_Fichier = fOuvre(fichierimpression,foLecture)
SI Numéro_Fichier = -1 ALORS
Erreur("erreur d'ouverture du fichier")
SINON
lignelue=fLitLigne(Numéro_Fichier)
TANTQUE lignelue<>EOT
iImprime(lignelue)
lignelue=fLitLigne(Numéro_Fichier)
FIN
iFinImprime
fFerme(Numéro_Fichier)
fSupprime(fichierimpression)

FIN