寻copyfile()函数的使用防法！ ( 积分: 0 )

我在进行文件拷贝时，想先自己产生文件所在路径，可是不成功，应该怎么做才能达到这个目的？
如下程序怎么处理？老说：string和pansichar不兼容！
s:=datetostr(date);
CopyFile('E:/实验/gzgl/caiwuke_gz/gz1/GZBMK.DBF','F:/备份/'+s+'gzbmk.bak' , False);
我已经没份了抱歉！

s:=datetostr(date);
spath := 'F:/备份/'+s+'gzbmk.bak';
CopyFile('E:/实验/gzgl/caiwuke_gz/gz1/GZBMK.DBF',Pchar(sPath) , False);