Fonction de copie, fonction de copie de fichiers.
CopyFile (
lpcstr lPexistingFileName, // chemin de fichier source
lpcstr lpnewFileName, // nouveau chemin de fichier
bool bfailifexists // si vrai, si le nouveau fichier existe déjà, renvoyez false;
couverture.
));
La fonction renvoie vrai pour le succès et faux pour l'échec;
Exemple:
Copyfile (pChar ('sql.txt'), pChar (extractFilePath (application.exename) + '2.txt'), true);
Plus tard, lors de l'expérimentation, j'ai constaté que le fichier source peut être converti sans ajouter de la fonction PCHA, mais le nouveau fichier ne peut pas être utilisé et une erreur de conversion de type se produira.
Utilisez ce répertoire du programme.
Parce que la fonction renvoie un type booléen, il peut également être écrit comme ceci:
Si copyfile ('d: /yun_yue/sql.txt', 7
// et, veuillez vous assurer que votre chemin de fichier est correct, sinon la fonction renvoie l'échec.
ShowMessage ('Copier le fichier terminé!')
autre
ShowMessage («Copier Fichier a échoué!»);
La fonction CopyFile peut également être copiée avec des fichiers dans les voisins du réseau.
Si copyfile ('// sh-sfis / yun_yue / yun_yue / copytext.txt', phar (extractFilePath (application.exename) + '2.txt'), false) puis
// Définition du troisième paramètre de la fonction ici sur false écrasera le fichier «2.txt» qui existe dans ce répertoire de mon application.
ShowMessage ('Copier le fichier terminé!')
autre
ShowMessage ('Copier Fichier a échoué!');