Discussion :

[zekiller3]

Bonjour,
je dois construire un index de fichier.
J'ai déjà stocké la structure de mon index dans un fichier nommé Dico.idx.
Je souhaite récupérer les données dans un tableau de type index mais c'est là que le programme plante.
Le message d'erreur à la ligne 'function genTabIndex(...)' est :

Error: Type identifier expected
Fatal: Syntax error, ";" expected but "ARRAY" found
Fatal: Compilation aborted

J'ai beau chercher, l'erreur doit être bête mais je ne la trouve pas.
Je demande votre aide encore une fois !

Code :

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
 
Type index = record
	cle : string[10];
	lien : LongInt;
end;
 
function genTabIndex(var fileIndex : file of index): array of index;
var tabIndex : array of index;
	idx : index;
begin
	setlength(tabIndex,0);
	OPEN(fileIndex,'index/Dico.idx');
	while not(EOF(fileIndex)) do begin
		setlength(tabIndex,length(tabIndex)+1);
		Read(fileIndex,idx);
		tabIndex[length(tabIndex)-1]:=idx;
	end;
	genTabIndex:=tabIndex;
end{/genTabIndex};

Merci

[inoussa]

salut

Code Delphi :

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
20
 
Type index = record
        cle : string[10];
        lien : LongInt;
      end;
      FA = file of index;
      IA = array of index;
function genTabIndex(var fileIndex : FA): IA;
var tabIndex : IA;
	idx : index;
begin
	setlength(tabIndex,0);
	OPEN(fileIndex,'index/Dico.idx');
	while not(EOF(fileIndex)) do begin
		setlength(tabIndex,length(tabIndex)+1);
		Read(fileIndex,idx);
		tabIndex[length(tabIndex)-1]:=idx;
	end;
	genTabIndex:=tabIndex;
end{/genTabIndex};

[zekiller3]

merci ça marche impec
mais bon je ne comprends pas pourquoi il faut passer par des constantes

[Loceka]

Parce que les fonctions/méthodes en Pascal n'accèptent pas de types composés en arguments ni en type retour (Il faut créer un type - et non une constante - correspondant au type composé que l'on veut lire ou retourner pour que ce soit possible).

[mathieu.toury]

Bonjour,

Cette astuce m aide beaucoup...

Merci

Kiki_surface

[droggo]

Jao,

Cette astuce m aide beaucoup...

Je ne pense pas qu'on puisse appeler ça "une astuce".

Parce que les fonctions/méthodes en Pascal n'accèptent pas de types composés en arguments ni en type retour (Il faut créer un type - et non une constante - correspondant au type composé que l'on veut lire ou retourner pour que ce soit possible).

Pour le retour, c'est vrai, mais pas pour les paramètres.

On peut parfaitement écrire

Code :

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

procedure tarte(var t : array of integer);

Avec quand même des inconvénients :

- dans la procédure, les limites des indices du tableau sont inconnues, et le 1er élément sera à l'index 0

- pour la même raison, la procédure ne sait pas jusqu'où pouvoir aller dans le tableau, et il faudra donc lui passer un 2ème paramètre, indiquant le nombre d'élements dans le tableau (et pas la limite max des indices utilisés par ailleurs, qui est autre chose).

Bien évidemment, je déconseille fortement ce genre d'acrobatie !!