The problem is rather simple.
I am making module creating zip and then adding files to the zip using delphi 6 and
ExecuteAndWait(‘7z.exe’, Format(‘u -p%s “%s” “%s” -spf2 -xr!EDZ’, [ZipPassword, ZipFileName, filePathToAdd]), SW_HIDE, ExitCode)
Basically calling invisible cmd to use 7zip cmd functionality.