командная строка криво выполняется (или руки такие))

[Владимир]

Всем доброго! Поставил 7-zip. Задача - сделать zip-архив aaaa.zip файлов и директорий в директории C:\mysoft\proga\. Пишу в cmd

Код: Выделить всё

C:\Program Files\7-zip\7z.exe a -tZip "C:\aaaa.zip" -r "C:\mysoft\proga\*.*"

Все Ок, в архиве именно файлы и каталоги из C:\mysoft\proga\.
Делаю то же из софта через TProcess:

Код: Выделить всё

.....
AProcess.CommandLine:='C:\Program Files\7-zip\7z.exe a -tZip "C:\aaaa.zip" -r "C:\mysoft\proga\*.*"';
AProcess.Optoins:=AProcess.Options+[poWaitOnExit];
AProcess.Execute;
.....

Получаю архив, включающий не нужную мне директорию \proga !
p.s. ShellExecute дает тот же результат.
Чего присоветуете?

[Padre_Mortius]

у меня Ваш код отработал без ошибок. Lazarus 1.4RC2 Win10

[Владимир]

у меня Ваш код отработал без ошибок. Lazarus 1.4RC2 Win10

Спасибо, но как-то не полегчало. Вы использовали Shell или TProcess? И куда копать?

[Vapaamies]

Поскольку путь к 7z.exe с пробелом, его тоже нужно заключить в кавычки.

[Владимир]

Поскольку путь к 7z.exe с пробелом, его тоже нужно заключить в кавычки.

Спасибо, попробовал - результат тот же...

Добавлено спустя 57 минут 42 секунды:
Re: командная строка криво выполняется (или руки такие) [РЕШЕНО]

у меня Ваш код отработал без ошибок. Lazarus 1.4RC2 Win10

Я балда! Полагаю, что 7-Zip корректно работает, если расширение получаемого архива соответствует ключу -t, я же попытался получить архив с отличным от .zip расширением.
Это работает:

Код: Выделить всё

AProcess.CommandLine:='C:\Program Files\7-zip\7z.exe a -tZip "C:\aaaa.zip" -r "C:\mysoft\proga\*.*"';

А это - чудит:

Код: Выделить всё

AProcess.CommandLine:='C:\Program Files\7-zip\7z.exe a -tZip "C:\aaaa.odt" -r "C:\mysoft\proga\*.*"';