No puedo copiar archivos

[Enric]

Hola
estoy utilizando el siguiente codigo en delphi 2010 y windows 7 para copiar un archivo de un directorio a otro y no funciona. ¿ Agien sabe por que no funciona ?
-------------------------
sArchivo := 'C:\HGDocs\FT\FT_'+mostres.FieldByName ('codic').AsString+'.pdf';
if not CopyFile(PChar('sPath'),PChar(sArchivo),False) then
MessageDlg('No he podido copiar el fichero', mtWarning,[mbOk], 0);

-------------------------
Dice 'No he podido copiar el fichero' y no lo copia. El Archivo de origen existe, y el directorio de destino tiene los permisos adecuados.

Gracias