Ej. Copiar Archivo

[shulygart]

Hola, Si alguien me puediera ayudar con un ejemplo o el codigo de como pasar un archivo de una carpeta a otra en delphi5 en tiempo de ejecusion, lo necesito para poder respaldar la bd de un programa a cualquier otra parte del disco duro o a un diskette.

Por su ayuda de antemanos muchas gracias.

[dec]

Hola,

Cuentas con las funciones "CopyFile" y "MoveFile"... entonces, ¿cuál es el problema?

[shulygart]

Originally Posted by dec

Hola,

Cuentas con las funciones "CopyFile" y "MoveFile"... entonces, ¿cuál es el problema?

Gracias dec por responder, pero en realidad nunca he hecho algo como esto soy novato en la programacion y no tengo los conocimientos necesarios, te agradeceria si me ayudas con un ejemplo de como poder copiar la BD a cualquier parte del disco duro.

[dec]

Hola,

Originally Posted by shulygart

(...) te agradeceria si me ayudas con un ejemplo de como poder copiar la BD a cualquier parte del disco duro.

Tratándose de copiar una base de datos (supongo que unos archivos, al fin y al cabo, pero, en fin, unos archivos "en concreto") alguien podrá decirte acaso más y mejor, pero, de esta forma puedes hacer uso de las funciones que refiero arriba:

Código Delphi [-]
   // Tres parámetros:
   //
   // 1º- Archivo de origen
   // 2º- Archivo de destino
   // 3º- Fallar en caso de que el archivo ya exista
   //
   if not Windows.CopyFile('C:\origen.txt', 'D:\destino.txt', false) then
     raise Exception.Create('No se pudo copiar el archivo...');
 
   // Dos parámetros:
   //
   // 1º- Archivo de origen
   // 2º- Archivo de destino
   //
   if not Windows.MoveFile('C:\origen.txt', 'D:\destino.txt') then
     raise Exception.Create('No se pudo mover el archivo...');

* En la ayuda de Delphi, y en la del SDK Win32 (accesible desde el menú de ayuda de Delphi) encontrarás más información sobre estas funciones.

[shulygart]

Originally Posted by dec

Hola,



Tratándose de copiar una base de datos (supongo que unos archivos, al fin y al cabo, pero, en fin, unos archivos "en concreto") alguien podrá decirte acaso más y mejor, pero, de esta forma puedes hacer uso de las funciones que refiero arriba:

Código Delphi [-]
// Tres parámetros:
//
// 1º- Archivo de origen
// 2º- Archivo de destino
// 3º- Fallar en caso de que el archivo ya exista
//
if not Windows.CopyFile('C:\origen.txt', 'D:\destino.txt', false) then
raise Exception.Create('No se pudo copiar el archivo...');
 
// Dos parámetros:
//
// 1º- Archivo de origen
// 2º- Archivo de destino
//
if not Windows.MoveFile('C:\origen.txt', 'D:\destino.txt') then
raise Exception.Create('No se pudo mover el archivo...');

* En la ayuda de Delphi, y en la del SDK Win32 (accesible desde el menú de ayuda de Delphi) encontrarás más información sobre estas funciones.

Gracias amigo me llamo jaime a ver que puedo hacer, luego te platico que paso hasta pronto.