如何移动文件 谁可以提供一个函数

Question

如何移动文件 谁可以提供一个函数包括uses 不然又出错函数也行 要是懒不用返回值 也不用检测文件存在不存在 光写个过程也行
参数就两个 原文件 目标文件夹 谢谢了!

Answer 1

windows单元自带，
function MoveFile(lpExistingFileName, lpNewFileName: PChar): BOOL; stdcall;

Answer 2

MoveFile( srcFileName, dstFileName );

Answer 3

就是用
function   MoveFile(lpExistingFileName,   lpNewFileName:   PChar):   BOOL;   stdcall;

Answer 4

var
srcFileName,dstFileName:string;
begin
MoveFile(PChar(srcFileName),PChar(dstFileName));
end;