UC知道delphi 7中 copyfile怎么用
来源：百度知道 编辑：UC知道 时间：2024/06/07 15:57:36
我是菜鸟，请教各位大侠
delphi 7中 copyfile怎么用
if copyfile(fn1,fn2,tf) = true then label1.Caption:='copy ok'
else label1.Caption:='no copy'; 有没有错？
为什么提示 incompatiable types:‘string’and‘pansichar’。
注：
var
fn1,fn2:string;
tf:boolean;
delphi 7中 copyfile怎么用
if copyfile(fn1,fn2,tf) = true then label1.Caption:='copy ok'
else label1.Caption:='no copy'; 有没有错？
为什么提示 incompatiable types:‘string’and‘pansichar’。
注：
var
fn1,fn2:string;
tf:boolean;
改成这样
if copyfile(PChar(fn1),Pchar(fn2),tf) then label1.Caption:='copy ok'
else label1.Caption:='no copy';
CopyFile是调用了微软的API函数，参数和Delphi 的String不兼容
转换一下就OK