Discussion :

[Jayceblaster]

Bonjour....
J'ai un programme écrit en pascal dans lequel je demande à l'utilisateur de m'indiquer un chemin de sauvegarde.
Mais comment je peux vérifier que le disque spécifié par cet utilisateur existe vraiment sur la machine, et tant qu'à faire que la place y est suffisante pour le stockage de mon fichier?????

Merci.

[j.p.mignot]

sous quel OS

[Jayceblaster]

je suis sous Windows 2000 professionnel

[Clandestino]

En utilisant les fonctions disksize et diskfree par exemple...

disksize <>-1 te dit si le disque existe
diskfree fait le reste...

[Jayceblaster]

Merci pour votre aide....
Cela marche tres bien pour savoir si le disque existe mais en faite pour savoir si il me reste de la place j'ai un ptit soucis.....
En effet mon programme (qui est une DLL) me permet de sauvegarder le résultat d'une phase de test dans un fichier XML mais la taille de ce fichier XML m'est inconnue et varie en fonction du test effectué. Et moi je souhaiterai vérifier avant de lancer la sauvegarde de mon XML vérifier que la taille de celui-ci est inférieure à l'espace libre sur mon disque pour eviter le plantage...
En fait existe-t-il un moyen de connaitre la taille d'un fichier avant de le sauvegarder???

Merci d'avance
Ps: si ca peut aider j'utilise TXmlDocument pour l'écriture de mon XML.

[j.p.mignot]

Code :

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

1
2
3
4
5
6
var f : file; taille : longint;
...
assign(f,your file name);
reset(f,1);
Taille:=filesize(f);
close(f);

on peut aussi proteger le code avec

Code :

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

1
2
3
4
5
6
7
{$i-}
write(f,.....):
if ioresult <> 0 then .... // voir les diffrents codes d'eereurs possibles
 
 
close(f);
{$i+}

[M.Dlb]

Ca doit exister, sinon tu dois pouvoir la retrouver. Sachant que les fichiers XML sont des fichiers texte, si tu connais le nombre de caractères de ton fichier, tu connais la taille (si tu connais le codage évidemment). Il doit surement y avoir des méthodes permettant de savoir le nombre de caractères dans ton objet TXMLDocument

[Eric Sigoillot]

En fait existe-t-il un moyen de connaitre la taille d'un fichier avant de le sauvegarder???

Eh bien, oui, forcément, vous savez à l'avance quelles données vous allez écrire dans ce fichier...

Pour vous rassurer, vous pouvez choisir d'écrire le TXMLDocument dans un flux (TMemoryStream par exemple), regarder la taille du flux, puis l'écrire sur disque en assigant ce flux à un autre flux, comme TFileStream.

Seul (gros) problème : si le fichier est d'une taille conséquente, vous consommez de la mémoire vive pour rien.

Donc soit vous connaissez à l'avance la taille des données à inscrire dans le fichier, et le tour est joué, il suffit de comparer avec l'espace disque disponible (DiskFree, ou appel à l'API du système d'exploitation, cf MSDN pour Windows par exemple), soit vous tentez le coup et annoncez une erreur d'écriture si l'espace se révèle insuffisant (procédé le plus souvent mis en place dans les applications).


@++