Copia de seguridad Delphi

[luna]

Hola!!

Somos muy pesadas, xo eso es lo que hemos hecho:

FOrigen:=' C:\Documents and Settings\MANUEL\Mis documentos\Home\DELPHI\Fuentes Ejercicios Delphi\Tablas\Bancos.dbf';
FDestino:=' C:\Documents and Settings\MANUEL\Mis documentos';
ok:=CopyFile(Pchar(FOrigen), Pchar(FDestino), false);
if ok then
MessageDlg('funciona',mtWarning,[mbOK],0);

¿Qué es lo que estamos haciendo mal? xq el mensaje de ok no se imprime y
x supuesto no copia nada

gracias de verdad.