PureBasic

oui effectivement
j'avais mal positionné la procedure comptage()

par contre, je me suis permis de mettre juste en dessous de

If ExamineDirectory(n, Dossier, "*.txt"); on examine le dossier
nb=0


car sinon il m'additionner a chaque fois le nombre de films
9,18,27, etc...

en tout cas merci ...

oui c ca
je voulais qu'a l'ouverture du menu il m'indique le nbre de films que j'ai

je te renvoies donc le prog qui deviendra bientot le tien, :lol: , mais grace à toi, j'apprends énormément, et je t'en remercies
a+

; déclaration des constantes

Enumeration

#menu
#Text_0
#Text_1
#Text ...

et oui c moi, mais je ne mettais pas enregistrer systematiquement

maintenant c fait

merci a vous 2
effectivement le soldat, c tout a fait ce que je veux faire, mais ca fonctionne pas le bout de code que tu m'as donné
lorsque je lui demande le nbre de films que j'ai repertorié, il s'arrete

je voulais savoir s'il y avait possibiliter d'entrer une adresse pour sauvegarder un fichier, sans se servir de savefilerequester.
en fait ce serait pour sauvegarder toutes les informations dans un seul endroit, sans demander à l'utilisateur, de choisir un fichier. Idem donc pour pouvoir rouvrir le ...

je craque :mad:

je n'y arrive pas

a qui saura m'aider, j'envoie mon programme

vous allez voir que je n'arrive pas a sauvegarder une fiche et à la rappeler


je suis trop nulle :cry:

merci de m'aider :wink:


;déclaration des constantes

Enumeration

#menu
#Text_0
#Text_1
#Text_2
#Text_3 ...

j'ai creer un fichier, mais j'ai du oublier quelque chose, est-ce que quelqu'un pourrait me donner un petit coup de main svp?


Procedure creation_fichier()
If CreateGadgetList(WindowID())







If CreateFile(0,"catalogue.txt")

titre.s= GetGadgetItemText(#text_9,a,1)
realisateur.s ...

merci beaucoup, je vais bosser et voir ce que je peux faire

en tout cas, c'est super
je mettrai le programme apres les rectifications pour que vous me donnier votre avis

merci a tous