Como Ejecuto un compactador desde delphi

[tulio]

Gracias seoana

fijate que tiene la siguiente linea que no me ejecuta nada

fecha:='c:\sistema\backup\arJ a co140207.arJ *.*';

shellexecute(f_backup.handle,nil,pchar(JFECha),nil,nil,SW_SHOW);

a esas dos lineas las puse en un boton y no hace nada.

Probe con esta instruccion porque el winexec da error de tipo de d.o.s. incorrecto.

gracias

[[seoane]]

Vamos por partes como dijo jack

El error que te da en esta linea

Código Delphi [-]
WinExec( PChar('Command.com / c ARJ A ' + fecha + '  *.gdb '), SW_SHOW );

seguramente es debido a que en windows XP no existe el fichero "Command.com", el interprete de comandos se llama "cmd.exe". Si sigues queriendo usarlo consulta primero su nombre en la variable de entorno COMSPEC, aunque no veo la necesidad de usarlo en este caso. Una instrucción como esta también serviría:

Código Delphi [-]
WinExec( PChar('C:\sistema\backup\ARJ A ' + fecha + '  *.gdb '), SW_SHOW );

Pero tienes razón, la instrucción WinExec esta condenada a desaparecer, solo se incluye para compatibilidad con aplicaciones antiguas. Así que mejor usar otra funciones como ShellExecute.

La razón porque no te funciona ShellExecute es porque en esta función el ejecutable y los parámetros se pasan por separado. Es decir, tendrías que hacer algo así:

Código Delphi [-]
fecha:='a co140207.arJ *.*';   Shellexecute(f_backup.handle,nil,'C:\sistema\backup\ARJ.exe',PChar(fecha),nil,SW_SHOW);

PD: me llamo seoane

[tulio]

Gracias seoane

Disculpa por la pifiada

Muy amable por tu ayuda, ya pude resolver mi problema.

Chau

tulio