Bonjour,

Je suis de retour avec un code mais qui ne fais rien. Il devrait normalement enregistrer le fichier qui est demandé par une boîte de dialogue (TSaveDialog je crois). Vu que je le fichier n'existe pas il n'écrit rien même si le fichier existe. Je peux constater que le fichier est bloqué par le programme donc je pense que c'est normale. Mais aucun message d'erreur apparaît,
Vous pouvez m'aider svp ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 //Sauver le temps dans un fichier
 if (SaveDialog1->Execute())
 {
 AnsiString TexteFichier = "test
 //Ouvre le fichier
 int Handle;
 if (Handle = FileOpen(SaveDialog1->FileName,fmOpenWrite) == false)
  ShowMessage("Fichier "+SaveDialog1->FileName+" impossible à ouvrir !");
 //Ecrit la chaine
 if (FileWrite(Handle,TexteFichier.c_str(),TexteFichier.Length()) == false)
   ShowMessage("Fichier "+SaveDialog1->FileName+" erreur d'écriture !");
 FileClose(Handle);
 }