[aleksnine]

Код:

Var
S,SP:string;
begin
s:='c:\progra~1\winrar\rar.exe'; // путь к проге , которую надо запустить
sp:=' a -o+ -r -s -y c:\arch\arch1.rar c:\dir1'; // параметры с которыми запустить
shellexecute(application.Handle,'open',pchar(s),pchar(sp),nil,sw_shownormal);