FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Comprimir con UPX
Querría preguntar si existe algún código para comprimir aplicaciones sin necesidad de arrastrarla encima del archivo UPX, sabiendo la ruta del archivo que queremos comprimir y del archivo UPX.
Tengo pensado poner ese código en un Tbuttom y poder comprimir aplicaciones externas desde alli. Gracias |
#2
|
||||
|
||||
Hola,
Podrías utilizar, por ejemplo, las funciones "ShellExecute" o "WinExec". Estas te permiten ejecutar un programa desde Delphi pasándole los parámetros que necesites y el programa admita. Para UPX, precisamente, existen ya "FrontEnd" disponibles. En Torry's Delphi Pages encuentras algunos. |
#3
|
|||
|
|||
si es eso lo que intento hacer nesesito saver cuales son los comandos de UPX, alguien me podria ayudar.
Gracias |
#4
|
||||
|
||||
desde el menú accesorios, saca el simbolo de sistema, vete a la ruta del upx y escribe
upx -h tendrás toda la ayuda en pantalla. saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente, se lo volveré a explicar hasta que no lo entienda, Gracias. |
#5
|
|||
|
|||
Hola, ya consegui el comando que queria, Ahora me a surgido otro problema.
En el Tbuttom tengo este codigo i cuando lo hago funcionar se me abre una pantalla de MS-DOS, supuestamente la del UPX i se me cierra al instante. Este es el codigo del TButtom Código:
WinExec(PChar('upx -9'+edit3.text),SW_SHOWNORMAL); Gracias! |
#6
|
||||
|
||||
Ese comportamiento es normal, a menos que uses SW_HIDE como parámetro. Deberías comprobar si el archivo comprimido está ahí o en otra carpeta de windows, realiza una búsqueda. Además puede que no solo necesite la ruta del archivo, sino tambien el nombre del mismo.
A simple vista veo que no hay un espacio despues del -9, por lo que podría interpretarse como un error y no generar el archivo. saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente, se lo volveré a explicar hasta que no lo entienda, Gracias. |
#7
|
|||
|
|||
Gracias a todos, ya lo consegui.
Si alguien le interesa el codigo correcto es este: Código:
WinExec(PChar('upx.exe "'+edit3.text+'" -9'),SW_SHOWNORMAL); |
|
|
|