Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Descomprimir archivo rar (https://www.clubdelphi.com/foros/showthread.php?t=91395)

edigol21 26-01-2017 16:21:40

Descomprimir archivo rar
 
Buen día:

Estoy implementando el siguiente código para descomprimir:
Código Delphi [-]
WinExec(PAnsiChar(AnsiString('"C:\Program Files (x86)\WinRAR\rar.exe" x '+PAnsiChar(AnsiString(sOpenDialog1.FileName+' C:\SGI\ /p123')))), SW_SHOW);

al ejecutar si los archivos existen en la ruta definida por el usuario me pide que por cmd le de una instrucción para que el lo remplace hay alguna manera de que el lo haga automático.

Neftali [Germán.Estévez] 26-01-2017 16:54:08

¿Te refieres al fichero que estás creando?
¿Y no lo puedes preguntar antes de lanzar ese comando?

Utiliza FileExist para saber si el fichero existe, puedes preguntar entonces al usuario si quiere sobreescribirlo y en todo caso borrrr el existente coin DeleteFile antes de generar el nuevo.

movorack 26-01-2017 17:43:55

Creo que el se refiere a la sobre-escritura de archivos cuando está descomprimiendo.

Si es así, debes usar una de las opciones de winrar para lineas de comando

bitbow 26-01-2017 19:18:03

Pasos sugeridos:
Descomprimes a un directorio temporal
validas el archivo existe previamente en la ruta del usuario (osea donde este el que vas a reemplazar) y preguntas si se desea reemplazar
En caso de que no exista solo descomprimes

Nota: si no es necesario que preguntes pues solo lo borras y copias de la ruta temporal a la ruta que quieras.

Para todo esto es necesario usar el FileExist, copy, etc.

Saludos.

newtron 27-01-2017 10:04:19

Hola.

Yo creo que deberías de añadir el switch o+ para que sobreescriba sin preguntar (por lo menos en el rar de msdos).

Saludos


La franja horaria es GMT +2. Ahora son las 02:38:55.

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