Einzelnen Beitrag anzeigen

Flodding

Registriert seit: 26. Dez 2007
Ort: Kiel
121 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: Problem mit ShellExecute...

  Alt 29. Mär 2009, 09:41
Delphi-Quellcode:
procedure TfrmMain.btnBackUpClick(Sender: TObject);
var
zipfile: PAnsiChar;
targetdir: PAnsiChar;
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;
So funktionierts...

Neues Problem welches ich vorher nicht bemerkt habe...

Delphi-Quellcode:
procedure TfrmMain.btnBackUpClick(Sender: TObject);
var
zipfile: PAnsiChar;
targetdir: PAnsiChar;
begin
zipfile:='C:\test.rar';
targetdir:='D:\Neuer Ordner\test';
ShellExecute(Handle, nil, PAnsiChar('.\system\7zip\7za.exe'), PAnsiChar('a ' + zipfile + ' ' + targetdir), nil, SW_SHOW);
end;
Hiermit führt er zwar die 7za.exe aus aber er erstellt keine rar-Datei...

EDIT:::

Lag daran dass ich PAnsiChar nutzte...

mit PChar gehts

EDIT::::::

UPS doch nicht... zu früh gefreut -.-*
Flo
  Mit Zitat antworten Zitat