Einzelnen Beitrag anzeigen

Flodding

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

Re: Problem mit ShellExecute...

  Alt 29. Mär 2009, 10:12
hab die lösung gefunden... wäre ich NIEMALS drauf gekommen... eigentlich supersimpel, aber das ist es ja meistens

also hier gefunden:

KLICK

und hier der funktionierende Code:

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;
Leider konnte ich die gänsefüße nicht fett machen, deshalb erwähne ich es extra nochmal... direkt hinter dem oberstrich (') kommen gänsefüße oben ('").. genauso am ende nur umgekehrt... ("')
Flo
  Mit Zitat antworten Zitat