Joleroy
Messages postés106Date d'inscriptionmardi 16 décembre 2003StatutMembreDernière intervention24 octobre 2005 9 juil. 2004 à 13:34
j' ai un petit blem'. je te l' ai decris dans mon message sur le forum.
japee
Messages postés1727Date d'inscriptionvendredi 27 décembre 2002StatutModérateurDernière intervention 6 novembre 20218 9 juil. 2004 à 09:26
Ça répond à ce que tu cherchais, Joleroy ?
Merci pour ton commentaire, sergejb. Concernant l'utilisation de l'option [ofOverwritePrompt], je cherche précisément à éviter absolument tout message d'alerte, cette fonction étant destinée essentiellement à un traitement automatisé de fichiers qui porteraient éventuellement le même nom, mais qui ne seraient pas identiques (traitement d'images en série, etc...).
Dans cet esprit, et pour cet usage, elle est fiable, mais ça ne veut pas dire qu'elle n'est pas perfectible, je la reprendrai sans doute pour l'améliorer. Si l'on choisit W := 1, par exemple, on va passer de "fichier9.ext" à "fichier10.ext", ce qui n'est pas génant, même si "fichier10.ext" existe déjà, un fichier existant de même nom n'étant jamais écrasé, mais bon...
cs_sergejb
Messages postés20Date d'inscriptionmercredi 16 octobre 2002StatutMembreDernière intervention12 juin 2006 9 juil. 2004 à 08:11
Routine intéressante pour créer des versions incrémentales par exemple lors de sauvegardes automatiques ou de traitement à risques. Si on utilise complètement les options de SaveDialog (voir aide Borland):
SaveDialog1.Options := [ofOverwritePrompt];
on déclenche également automatiquement un message d'alerte qui evite l'écrasement. Alors une version simplifiée de la fonction IncIfExists peut etre codée, qui évite le test d'existence du fichier.
Bravo pour l'idée
Joleroy
Messages postés106Date d'inscriptionmardi 16 décembre 2003StatutMembreDernière intervention24 octobre 2005 8 juil. 2004 à 20:45
9 juil. 2004 à 13:34
9 juil. 2004 à 09:26
Merci pour ton commentaire, sergejb. Concernant l'utilisation de l'option [ofOverwritePrompt], je cherche précisément à éviter absolument tout message d'alerte, cette fonction étant destinée essentiellement à un traitement automatisé de fichiers qui porteraient éventuellement le même nom, mais qui ne seraient pas identiques (traitement d'images en série, etc...).
Dans cet esprit, et pour cet usage, elle est fiable, mais ça ne veut pas dire qu'elle n'est pas perfectible, je la reprendrai sans doute pour l'améliorer. Si l'on choisit W := 1, par exemple, on va passer de "fichier9.ext" à "fichier10.ext", ce qui n'est pas génant, même si "fichier10.ext" existe déjà, un fichier existant de même nom n'étant jamais écrasé, mais bon...
9 juil. 2004 à 08:11
SaveDialog1.Options := [ofOverwritePrompt];
on déclenche également automatiquement un message d'alerte qui evite l'écrasement. Alors une version simplifiée de la fonction IncIfExists peut etre codée, qui évite le test d'existence du fichier.
Bravo pour l'idée
8 juil. 2004 à 20:45