RE:grabar un archivo del disco c: al a:
Hola S/ la Vers que Uses
A partir de la 8 Usas Filecopy()
Caso contrario debes Usar la Api de Windows
----------------------------------------------------------------
SHFileOperation( )
Ejemplo de copiar, borrar y mover ficheros.
Global External Function:
FUNCTION long SHFileOperation( Ref SHFILEOPSTRUCT lpFileOp ) Library "SHELL32.DLL" Alias For "SHFileOperationA"
Structure: (SHFILEOPSTRUCT)
hWnd As Long // hWnd del formulario
wFunc As unsignedlong // Función a usar: FO_COPY, etc.
pFrom As String // Fichero(s) de origen
pTo As String // Fichero(s) de destino
fFlags As unsignedlong // Opciones
fAnyOperationsAborted As Boolean // Si se ha cancelado
hNameMappings As Long '
lpszProgressTitle As String // Sólo si se usa FOF_SIMPLEPROGRESS
Script: (Ejemplo para Copiar)
string sFicOri
string sFicDes
shfileopstruct SHFileOp
sFicOri = "c:\temp\*.*"
sFicDes = "c:\borrar\"
SHFileOp.wFunc = 2 //Copiar
SHFileOp.fFlags = 64 //Enviar a papelera
SHFileOp.pFrom = sFicOri
SHFileOp.pTo = sFicDes
SHFileOp.lpszProgressTitle = "Copiando los ficheros especificados"
SHFileOperation(SHFileOp)
Suerte..