numéro auto - Programmation
Marsh Posté le 11-03-2001 à 17:53:44
il me semble que la propriété tag d'un des composants de ton application(Form1 par exemple) pourrait très bien servir, comme confirmation lis l'aide concernant cette propriété.
Marsh Posté le 12-03-2001 à 10:52:54
après contrôle mauvaise direction, le tag ne fonctionne qu'en interne et est remis à zéro à chaque inititalisation du prog.
Meilleure solution:
Déclarer un type record:
type TRec= record
tes variables
end;
Déclarer un fichier:
FichConf: file of TRec;
Déclarer un de tes records:
MonRecConf: TRec;
Fonction d'écriture:
AssignFile(FichConf,Chemin_fichier);
Rewrite(FichConf);
try
Write(FichConf,MonRecConf)
finally
CloseFile(FichConf)
end;
tu peux y ajouter un test pour voir si le fichier existe.
Ce doit être fileexist(s), exist(s)file, exist(s) ou quelque chose d'approchant. Fouille dans l'aide.
Fonction de lecture:
AssignFile(FichConf,Chemin_fichier);
reset(FichConf);
try
if not Eof(FichConf) then Read(FichConf,MonRecConf)
finally
CloseFile(FichConf)
end;
Il ne te reste plus qu'à remplir le record dans ton programme et
à lancer une première écriture de ton fichier de config sans aucune lecture, après il ne te reste plus qu'à utiliser le tout normalement. Si tu devais modifier la structure de ton fichier de config, n'oublies pas la première écriture.
Marsh Posté le 10-03-2001 à 07:32:40
Je voudrais mettre un numéro incrémentable à chaque ouverture de ma fiche.
Dans un fichier ini par exemple.
Comment faire ?????