Thema: Delphi DosCommand ohne exe

Einzelnen Beitrag anzeigen

ysveikata
(Gast)

n/a Beiträge
 
#10

Re: DosCommand ohne exe

  Alt 30. Jul 2008, 14:41
Also es läuft jetzt, aber ich mach s natürlich lieber auf der sicheren Seite. Wie müsste ich denn in meinem jetzigen Code ändern um die %compsec% Variante zu wählen?


// Delete Bitmaps.
exstr:='cmd.exe';
pstr:='/C del '+path+'*.bmp';

shexecinfo.cbSize:=sizeof(SHELLEXECUTEINFO);
shexecinfo.fMask:=SEE_MASK_NOCLOSEPROCESS;
shexecinfo.lpVerb:=nil;
shexecinfo.lpFile:=PChar(exstr);
shexecinfo.lpParameters:=PChar(pstr);
shexecinfo.lpDirectory:=nil;
shexecinfo.nShow:=SW_HIDE;

ShellExecuteEx(@shexecinfo);
WaitForSingleObject(shexecinfo.hProcess,INFINITE);



Wieder mal DANKE!
  Mit Zitat antworten Zitat