Discussion :

[casevanin]

Bonjour, je suis débutant en windev mobile, je m'exerce sur windev express 28. j'aimreai affecter la valeur d"un attribut d'un fichier à un autre alors j'utilise le code ci-dessous mais je reçois un message que j'ai du mal à corriger car je ne trouve pas l'erreur. merci de m'aider.

le code que j'utilise, je souhaite affecter la valeur de l'attribut solde à l'attribut solde_disponible du fichier compte

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
20
21
F est un Fichier 
 
SI fOuvre ("Compte.fic")  ALORS
	// Lecture de chaque ligne du fichier
	TANTQUE PAS F.FinDeFichier() 
		// Lecture de la ligne
		F.Lire()
		// Initialisation de l'attribut 'solde_disponible' avec la valeur de l'attribut 'solde'
		F.solde_disponible = F.solde
		// Vous pouvez aussi faire une conversion de type si nécessaire, par exemple:
		// F.solde_disponible= NombreVersChaîne(F.solde)
		// Ecriture de la ligne modifiée
		F.Ecrire()
	FIN
 
	// Fermeture du fichier
	F.ferme()
SINON
	// Gestion de l'erreur d'ouverture
	Info ("Erreur lors de l'ouverture du fichier.")
FIN

et je recois le message d'erreur suivant:
Erreur :Erreur de syntaxe sur le mot . FEN_new_compte, Fin d'initialisation de FEN_new_compte, ligne 10, colonne 29

[tbc92]

Je ne suis pas sur que ce soit la seule erreur, mais il y a une faute 'classique' dans ton code, une faute que tout développeur a fait au moins une fois.

Tu as une boucle comme ça :

Code :

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

1
2
3
4
Tantque pas F.FindeFichier()
   F.Lire()
   Traitement()
Fin

Imaginons que le fichier contient un seul enregistrement.
On entre une première fois dans cette boucle, on exécute les 2 instructions Lire() et Traitemennt()
A ce moment là, le 'compilateur' n'a pas l'information que le fichier est fini. il n'a cette information que quand il essaie de lire un nouvel enregistrement, et que la lecture échoue parce que le fichier et fini.
Du coup, on entre une 2ème fois dans la boucle, on fait une 2ème lecture (qui échoue, mais ce n'est pas grave), et on exécute l'instruction traitement() mais avec des données fictives.

Pour une boucle TantQue, il faut procéder ainsi :

Code :

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

1
2
3
4
5
F.Lire()
Tantque pas F.FindeFichier()
   Traitement()
   F.Lire()
Fin

[serendib]

Bonjour,

Si Compte.fic est un fichier HF files au plus vite sur le cours d'autoformation.
Sinon oublies mon intervention.

Cordialement.