[grimo]

Ок все всем спасибо)))

вот так надо)

p := SHELL('e:\program files\winrar\winrar.exe', 'm', 'g:\111\bbb.rar g:\111\aaa.txt');

с уважением...