各為前輩與版主：
我知道Delphi可以呼叫外部程式，使用ShellExecute() 函數，但是一直找不到呼叫winrar來壓縮特定目錄的檔案
懇請各為前輩給予提示！ 萬分感謝！

------
「人們所以覺得寂寞，是因為他們會築牆，卻不會搭橋。」
程式寫的越久，卻發現自己越來越不會寫程式！

Reference :
http://kentagon.tar.hu/Delphi_theBigCore.html
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle,'open','C:\Program Files\winrar\winrar.exe','Add C:\RARFileName C:\PATH\',Nil,SW_SHOWNORMAL);
end;


Fishman

------
Fishman

感謝前輩回應:
我搭配的winrar版本為winrar 3.5
ShellExecute(Handle, 'open', 'C:\Program Files\winrar\winrar.exe', 'A -r C:\DB.rar C:\DT2006CO\DB.MDB ', nil, SW_SHOWNORMAL);
謝謝您

------
「人們所以覺得寂寞，是因為他們會築牆，卻不會搭橋。」
程式寫的越久，卻發現自己越來越不會寫程式！