Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Ayuda descomprimir archivos con pass (https://www.clubdelphi.com/foros/showthread.php?t=64494)

dellarts 03-04-2009 23:41:00

Ayuda descomprimir archivos con pass
 
Hola

Este codigo compila perfectamente pero no hace lo que deberia ya no se que mas probar alguien sabe el xk no funciona? igual no es posible hacerlo en delphi.

Código:

an := 'a';

WinExec(pansichar('\"C:\Archivos de programa\WinRAR\rar.exe" x C:\prueba\Escritorio.rar C:\prueba /p'+an), SW_HIDE);

"an" es una variable de tipo string que tiene el valor del pass del archivo comprimido.


Saludos

cHackAll 04-04-2009 06:00:55

Hola dellarts, lo correcto era que continues el anterio hilo que tu mismo inicaste explicando mejor el problema...

Cita:

Empezado por dellarts (Mensaje 343825)
...
Código:

an := 'a';
 
WinExec(pansichar('\"C:\Archivos de programa\WinRAR\rar.exe" x C:\prueba\Escritorio.rar C:\prueba /p'+an), SW_HIDE);

...

El codigo esta asi con ese "\" extra al principio de la cadena?

Saludos

dellarts 04-04-2009 14:33:55

Eso lo lei en la ayuda de delphi en teoria tiene ke ir asi. Igualmente lo probe sin la "\" inicial y tampoco funciona.

Saludos

PD: La proxima vez seguire el hilo antiguo

cHackAll 04-04-2009 19:39:33

se utiliza \" en C, en Delphi ese \ esta por demas.

Probablemente te este fallando porque usas espacios en la contraseña, porque lo volvi a probar y funciona.

dellarts 13-04-2009 22:55:47

Hola

Aun no he conseguido ke me funcione

Código:


WinExec(pansichar('"C:\Archivos de programa\WinRAR\rar.exe" x C:\prueba\Escritorio.rar C:\prueba /p'+an), SW_NORMAL);

Este es el codigo que dices que te funciona no? Si es asi dime que delphi tienes porfavor igual es x la version de delphi o algun componente.

Saludos

cHackAll 14-04-2009 02:31:29

Cita:

Empezado por dellarts (Mensaje 344820)
...igual es x la version de delphi o algun componente...

Cuando se trabaja a nivel de APIs no es muy relevante la version del IDE, mas probable es que falle la version de RAR o talvez las pruebas.

Qué planeas hacer? por que no pones el código completo a ver si el problema viene por ahi?

dellarts 14-04-2009 17:53:22

Cita:

Empezado por cHackAll (Mensaje 344831)
Cuando se trabaja a nivel de APIs no es muy relevante la version del IDE, mas probable es que falle la version de RAR o talvez las pruebas.

Qué planeas hacer? por que no pones el código completo a ver si el problema viene por ahi?


Gracias x tu ayuda no sabia que hacer asi que te hice caso y deje de centrarme en el programa asi que reinstale el winrar y me funciono ^^


Gracias x todo

Saludos


La franja horaria es GMT +2. Ahora son las 01:27:26.

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