Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 30-09-2007
Avatar de jorgegetafe
jorgegetafe jorgegetafe is offline
Miembro
 
Registrado: dic 2006
Posts: 238
Poder: 18
jorgegetafe Va por buen camino
Manejar carpetas con delphi...

Saludos, quiero hacer un programa que haga copias de seguridad de una carpeta y todo lo que este dentro de ella, (copiar y pegar vamos...) la pega es que sé copiar archivos con delphi pero no carpetas, asi que me gustaría saber como hacer esto:

-copiar carpetas (con todo su contenido)
-pegar carpetas
-renombrar carpetas
-pegar carpeta en una ruta dada.
-eliminar carpetas y todo su interior.

En un principio el programa que voy a crear y la carpeta que quiero copiar están en el mismo directorio.

Muchas gracias.
__________________
Explicate como si fuese tonto, soy nuevo en esto de hacer programas!!!! XD
Responder Con Cita
  #2  
Antiguo 30-09-2007
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Busca en los trucos, los foros y la ayuda de Delphi sobre "TSHFileOpStruct". Lo que no puedas hacer coméntalo por aquí.
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #3  
Antiguo 02-10-2007
Avatar de jorgegetafe
jorgegetafe jorgegetafe is offline
Miembro
 
Registrado: dic 2006
Posts: 238
Poder: 18
jorgegetafe Va por buen camino
Muchas gracias, encontré justo lo que quería aqui: http://www.q3.nu/trucomania/truco.cgi?325&esp

tan solo una cosita, dice arriba del todo que se puede mostrar el progreso de la copia, me gustaría hacer eso, he mirado la ayuda de delphi y no entiendo nada... :-( alguien me puede decir como se hace eso?



Por cierto, la copia de seguridad la quiero hacer en pendrive (origen y destino en el mismo usb) como lo puedo hacer? ya que en un ordenador la ruta sera por ejemplo:

'G:\Documentos' y si meto el mismo pendrive en otro ordenador puede ser: 'D:\Documentos' y claro, error!!!! como puedo solucionar esto? gracias.

gracias.
__________________
Explicate como si fuese tonto, soy nuevo en esto de hacer programas!!!! XD

Última edición por jorgegetafe fecha: 02-10-2007 a las 19:06:33.
Responder Con Cita
  #4  
Antiguo 03-10-2007
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Cita:
tan solo una cosita, dice arriba del todo que se puede mostrar el progreso de la copia, me gustaría hacer eso, he mirado la ayuda de delphi y no entiendo nada... :-( alguien me puede decir como se hace eso?
Siguiendo el ejemplo que mencionas, se trata de jugar con las banderas (flags) en el miembro "fFlags" de la estructura "TShFileOpStruct". En la ayuda de Win32 está bastante bien explicado. Prueba con algo así:

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);

   function CopiaTodo(Origen,Destino : String) :
   LongInt;
   var
     F : TShFileOpStruct;
     sOrigen, sDestino : String;
   begin
     Result := 0;
     sOrigen := Origen + #0;
     sDestino := Destino + #0;

     with F do
     begin
       Wnd   := Application.Handle;
       wFunc := FO_COPY;
       pFrom := @sOrigen[1];
       pTo   := @sDestino[1];
       fFlags := FOF_ALLOWUNDO or FOF_NOCONFIRMATION or FOF_SIMPLEPROGRESS;
     end;

     Result := ShFileOperation(F);
 end;

 begin
   CopiaTodo('c:\Delphi3\*.*','c:\kk');
 end;

Cita:
Por cierto, la copia de seguridad la quiero hacer en pendrive (origen y destino en el mismo usb) como lo puedo hacer? ya que en un ordenador la ruta sera por ejemplo:

'G:\Documentos' y si meto el mismo pendrive en otro ordenador puede ser: 'D:\Documentos' y claro, error!!!! como puedo solucionar esto? gracias.
¿Tu aplicación se ejecutará en el PenDrive? Si es así, puedes usar funciones como "GetDriveName" para averiguar la unidad ruta en que se encuentra tu publicación y a partir de ahí conformar la ruta que necesites.

Si tu aplicación no se ejecuta en el PenDrive... ahora mismo sólo se me ocurre lo más obvio: preguntar al usuario (¿hay usuario?) por la ruta en que quiere que se realize la copia de seguridad, comprobar su existencia y proceder.
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Es posible compartir carpetas por Internet utilizando compartir carpetas? JuanErasmo Windows 5 12-02-2007 21:45:17
Proteger Carpetas bustio Windows 5 20-09-2006 12:06:18
como manejar errores con las excepciones en delphi Nelly Varios 2 06-10-2005 19:24:48
Como puedo manejar el puerto paralelo con Delphi 2005 .NET? z-7 .NET 4 26-07-2005 13:47:40
crear carpetas docarrillo Varios 1 12-12-2003 22:40:56


La franja horaria es GMT +2. Ahora son las 21:52:08.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi