我儘量壓縮使用winrar
命令行, 文件但是當我在命令行中加一個變量,我得到這些錯誤 不兼容的類型「PWideChar」和「串」!不兼容的類型pwidechar和字符串的ShellExecute
我轉換SDATE變量WideChar,但它不工作!
我怎樣才能解決呢!
procedure TForm1.Button1Click(Sender: TObject);
var
mydate : TDateTime;
sdate : string;
begin
mydate:= Now-7;
sdate := FormatDateTime('YYYY/mm/dd',mydate);
ShellExecute(0, 'open', PChar('C:\Program Files\WinRAR\WinRar.exe'),
'a -r -ta'+ PChar(sdate) +' D:\xlsFiles.rar D:\*.xls*', nil, SW_SHOW);
end;
'ShellExecute'以有利於'ShellExecuteEx'的棄用,後者在一個健全的方式能夠報告錯誤。但是,由於您正在執行新的進程,因此最好調用'CreateProcess'。 –
你可能想跳過調用另一個進程,並使用ZIP庫,而不是像內置的TZipFile,Abbrevia,... –