byhakim
Messages postés5Date d'inscriptionsamedi 9 août 2003StatutMembreDernière intervention20 juin 2004
-
19 juin 2004 à 13:44
japee
Messages postés1727Date d'inscriptionvendredi 27 décembre 2002StatutModérateurDernière intervention 6 novembre 2021
-
20 juin 2004 à 17:17
bonjour;
quand j'utilise renamefile(fsource,fdestination) ;
fdestination est specifié ..la commande marche.
ex : renamefile('c:\aaa\azerty.txt','c:\aaa\azerty1.txt').
mais quand le fichier source est par exemple:
S; (S: varible string); ca ne marche pas.
ex
S:= 'c:\aaa\'+ edit1.text+'.txt';
renamefile('c:\aaa\azerty.txt',S);
meme si je fait renamefile('c:\aaa\azerty.txt',Pchar(S));
japee
Messages postés1727Date d'inscriptionvendredi 27 décembre 2002StatutModérateurDernière intervention 6 novembre 20218 20 juin 2004 à 17:17
Bon, suite à ton message, je vais être plus explicite :approve)
Tout ce qui suit fonctionne sans problème :
procedure TForm1.Button1Click(Sender: TObject);
var Origine: String;
begin
Origine := 'Origine.txt';
RenameFile(Origine, 'Nouveau.txt');
end;
procedure TForm1.Button2Click(Sender: TObject);
var Origine, Nouveau: String;
begin
Origine := 'C:\Chemin\Origine.txt';
Nouveau := 'C:\Chemin\Nouveau.txt';
RenameFile(Origine, Nouveau);
end;