FORUM MP | ADA : Lire un fichier

COMMUNAUTE MP

Identifiez vous ...

DOMAINE MP

Bavardages

Langages Généraux

Langages Web

Langages DotNet

Autres langages

Dev. Jeux Video

Sécurité

Sys. Exploitation

Graphismes

Logiciels

Réseaux

Bases de données

Méthodologies

Emplois High-tech

Aide juridique

Articles juridiques

FORUM

CHAT MP IRC

Votre pseudo ...

Srv: irc.moteurprog.com

Chan: #MoteurProg

PARTICIPER

Plus de 3500 emplois.

Visiteur MP

Lire un fichier
	Forum : ADA Sous Catégorie : Aucune Type du sujet : Sujet Normale FAQ : FAQ ADA
		SUIVI PAR MAIL INACTIF
		SUJET NON RESOLU
		SUJET ACTIF
		N'APPARTIENT PAS A LA FAQ

PAGE : [1]

FORUM ADA
	Page précedente	Page suivante

TaeKrage
Nouveau membre

Inscrit : 04/06/2006
Messages : 2

#99174 Posté le 04/06/06 à 12:20

Bonjour, j'ai un fichier txt avec des mots sur chaque ligne. Je voudrais, avec Ada, pouvoir lire chaqune de ces lignes, l'idéal serait de faire une boucle for et de pouvoir affecter le mot à une variable. Comment faire ? Merci. :():

HAUT DE PAGE

Publicité

Inscrit : X
Messages : X

#Aucun

HAUT DE PAGE

Marthyi
Nouveau membre

Inscrit : 06/01/2006
Messages : 17

#99242 Posté le 05/06/06 à 08:51

il te faut déclarer une varible fichier de type
-i]file_type[/i]
OUVRIR EN LECTURE
open(nom_variable,In_File,"nom.txt");
LIRE(c'est ici qu'il te faut faire une boucle
get(nom_variable,variable_chaine_de_caractères);
FERMER
close(nom_variable);
TEST FIN DU FICHIER
END_OF_FILE(Nom_variable) c'est une fonction qui resort un booleen
__________________________
Loin de moi ce manichéïsme du choix épicurien face à la vie...

HAUT DE PAGE

TaeKrage
Nouveau membre

Inscrit : 04/06/2006
Messages : 2

#99280 Posté le 05/06/06 à 13:28

Ok merci !

Mais je ne veux pas écrire sur le fichier, je veux juste récupérer les mots, chaque mot étant séparé par un retour à la ligne. Comment je fais si je veux récupérer le mot de la ligne 20 par exemple ?

Merci !

HAUT DE PAGE

Marthyi
Nouveau membre

Inscrit : 06/01/2006
Messages : 17

#99289 Posté le 05/06/06 à 13:41

for I in 1..20 loop Skip_Line(Fich); end loop; Get(Fich,Chaine);

__________________________
Loin de moi ce manichéïsme du choix épicurien face à la vie...

HAUT DE PAGE


	Page précédente	Page suivante
FORUM ADA

PAGE : [1]

.: Site Web développé par Julien Pichot et l'équipe MPWG avec www.evolvia-web.com :.