
04-07-2017, 11:04
|
 |
Registered User
|
|
Join Date: Mar 2014
Location: Iran
Posts: 642
Thanks: 3,602
Thanked 1,308 Times in 464 Posts
|
|
Quote:
Originally Posted by LuisCésar82
Using AdvSplit tool, work using cmd to join parts?
function JoinFile(const FileName, OutFile: String): Boolean;
var
Param: String;
ResultCode: Integer;
begin
ForceDirectories(ExtractFileDir(OutFile));
if FileExists(OutFile) then
Param := 'COPY /B "' + OutFile + '" + "' + FileName + '" "' + OutFile + '"'
else
Param := 'COPY /B "' + FileName + '" "' + OutFile + '"';
Result := Exec(ExpandConstant('{cmd}'), '/C "' + Param + '"', '',SW_HIDE, ewWaitUntilTerminated, ResultCode);
end;
Here is a example using sfk.exe (Swiss File Knife). Split individual parts on especify size...
https://mega.nz/#!cAQRjQBJ!gT6Owe5qE...cSgTbzp9tC-EV8
|
Hi LuisCésar82
How to replace these codes with Split.exe in CIU.
|