Hallo,
du kannst es auch so lösen, denke ich:
Delphi-Quellcode:
procedure TfrmMain.btnBackUpClick(Sender: TObject);
var
zipfile:
string;
targetdir:
string;
begin
zipfile := '
C:\test.rar';
targetdir := '
D:\test\test';
ShellExecute(
Handle,
nil, PAnsiChar('
.\system\7zip\7za.exe'), PAnsiChar('
a ' + zipfile + '
' + targetdir),
nil, SW_SHOW);
end;
Ist aber ungetestet.
Grüße, Matze