procedure TForm1.Button1Click(Sender: TObject); var return:boolean; begin return:=RenameFile('D:\mydir', 'D:\yourdir'); if return then showmessage('success') else showmessage('failed'); end;
我在用RENAMEFILE时碰到这样一问题 var old, new : string; ... //OLD, NEW 都是文件夹名, 不是文件名.renamefile(old, new);// do not work renamefile('d:\old', 'd:\new')// works不知道是怎么回事?
var return:boolean;
begin
return:=RenameFile('D:\mydir', 'D:\yourdir');
if return then
showmessage('success')
else
showmessage('failed');
end;
var
old, new : string;
...
//OLD, NEW 都是文件夹名, 不是文件名.renamefile(old, new);// do not work
renamefile('d:\old', 'd:\new')// works不知道是怎么回事?