ShellExecute(FMain.Handle, nil, 'pacomp','-a -c2 -r -P -q' + Edit1.Text' "C:\*.*"', nil, SW_NORMAL);
Oder hab ich mal wieder alles falsch verstanden??
edit: So schlimm darf man das hier nicht stehen lassen...
Stimmt immer noch nicht alles, aber ich wollt den Code von Luckie nicht einfach kopieren!