Discussion :

[alfy06]

Bonjour a tous,
J'aimerais savoir comment transférer les données d'un fichier dans un tableau?

pour préciser, j'ai un type:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
type t_couleur=Record
Rouge:0..255;
vert:0..255;
bleu :0..255;
end;
 
var F: file of t_couleur
 
le tableau est un type:
type t_tab=array(1..lig,1..col) of t_couleur

Comment rentrer ces données dans tableau ?
merci beaucoup par avance !

[droggo]

Doa,

C'est à toi de savoir comment est organisé ton fichier, on ne peut pas deviner, les boules de cristal sont en grève.

[Alcatîz]

Bonjour et bienvenue,

Si ton problème se situe au niveau de la lecture du fichier, tu as à ta disposition différents documents comme :

• http://pascal.developpez.com/cours/p...page_14#LXIV-B
• http://pascal.developpez.com/cours/c...ge=pg_Fichiers
• http://pascal.developpez.com/faq/?page=Les-fichiers

Sinon, tu fais varier les n° de ligne et de colonne dans la boucle de lecture, comme par exemple :

Code pseudocode :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Variables
indice_lig : ENTIER
indice_col : ENTIER
F : FICHIER DE t_couleur
tab : TABLEAU [lig x col] DE t_couleur

Traitement
ouvrir_fichier(F)
indice_lig <-- 1
indice_col <-- 1
TANT QUE (NON fin_fichier) FAIRE
|  tab[indice_ligne,indice_col] <-- lire_enregistrement_fichier(F)
|  SI indice_col < col
|  |  ALORS
|  |  |  indice_col <-- indice_col + 1
|  |  SINON
|  |  |  indice_col <-- 1
|  |  |  indice_lig <-- indice_lig + 1
fermer_fichier(F)

Il ne faut pas oublier de gérer les erreurs de lecture du fichier et la possibilité que le tableau soit trop petit pour contenir tout le fichier.