открыть консоль windows и выполнить в ней команду. Пробелы в пути к ЕХЕ

[BLACK_RAIN]

Здравствуйте.
Очередной тупой вопрос из серии "почему это не работает?" и "чё вообще происходит?"
Нужно открыть окно консоли windows и в нем выполнить команду.

//код GunSmoker'a:
procedure ShellExecute(const AWnd: HWND; const AOperation, AFileName: String;
                       const AParameters: String = ''; const ADirectory: String = '';
                       const AShowCmd: Integer = SW_SHOWNORMAL);
var
  ExecInfo: TShellExecuteInfo;
  NeedUnitialize: Boolean;
begin
  Assert(AFileName <> '');

  NeedUnitialize := Succeeded(CoInitializeEx(nil, COINIT_APARTMENTTHREADED or COINIT_DISABLE_OLE1DDE));
  try
    FillChar(ExecInfo, SizeOf(ExecInfo), 0);
    ExecInfo.cbSize := SizeOf(ExecInfo);

    ExecInfo.Wnd := AWnd;
    ExecInfo.lpVerb := Pointer(AOperation);
    ExecInfo.lpFile := PChar(AFileName);
    ExecInfo.lpParameters := Pointer(AParameters);
    ExecInfo.lpDirectory := Pointer(ADirectory);
    ExecInfo.nShow := AShowCmd;
    ExecInfo.fMask := SEE_MASK_NOASYNC { = SEE_MASK_FLAG_DDEWAIT для старых версий Delphi }
                   or SEE_MASK_FLAG_NO_UI;
    {$IFDEF UNICODE}
    // Необязательно, см. http://www.transl-gunsmoker.ru/2015/...tually-do.html
    ExecInfo.fMask := ExecInfo.fMask or SEE_MASK_UNICODE;
    {$ENDIF}

    {$WARN SYMBOL_PLATFORM OFF}
    Win32Check(ShellExecuteEx(@ExecInfo));
    {$WARN SYMBOL_PLATFORM ON}
  finally
    if NeedUnitialize then
      CoUninitialize;
  end;
end;

Юзаем:

  ShellExecute(Handle,'', 'cmd.exe', '/k "' + Edit2.Text + '"');
//edit2 содержит текст "H:\Other programs\FFMpeg\ffmpeg.exe" без кавычек
end;

Работает. Юзаем дальше:

  ShellExecute(Handle,'', 'cmd.exe', '/k "'+ Edit2.Text + '" -i "any text"');
//edit2 содержит текст "H:\Other programs\FFMpeg\ffmpeg.exe" без кавычек
end;

Не работает! В окне консоли выдаётся сообщение: ""H:\Other" не является внутренней или внешней командой, исполняемой программой или пакетным файлом."
Почему? Ведь путь к ЕХЕ взят в кавычки. Как это исправить?

[BLACK_RAIN]

Можно через GetShortPathName путь сокращать. Тогда работает и без кавычек.
Но почему вариант с кавычками не работает? Ведь если вручную набрать в консоли ту же самую команду (или вставить ее) - работает. А если вызвать программно - тогда не работает.
В чем разница?

[NetSpace]

PChar(твоя строка c кавычками) не поможет?

[northener]

Сообщение от BLACK_RAIN

ShellExecute(Handle,'', 'cmd.exe', '/k "'+ Edit2.Text + '" -i "any text"');

А если так

ShellExecute(Handle,'', 'cmd.exe', '/k "'+ Edit2.Text + ' -i "any text"');

[min@y™]

02-31-17.png

[BLACK_RAIN]

Сообщение от northener

А если так

Происходит ровно то же самое. Хотя, по-идее, должна быть ошибка синтаксиса.
Я еще вот что выяснил. Если после "path\ffmpeg.exe" не ставить еще кавычки, тогда работает. Но не ставить их нельзя, так как в именах файлов и папок скорее всего будут пробелы.

Min@y
А чего в этой структуре может быть не так? Ну посмотрел. Там всё правильно:
lpVerb = nil
lpFile = 'cmd.exe'
lpParameters = '/k "H:\Other programs\FFMpeg\ffmpeg.exe" -i "any text"'
lpDirectory = nil

[min@y™]

Сообщение от BLACK_RAIN

А чего в этой структуре может быть не так? Ну посмотрел. Там всё правильно:
lpVerb = nil
lpFile = 'cmd.exe'
lpParameters = '/k "H:\Other programs\FFMpeg\ffmpeg.exe" -i "any text"'
lpDirectory = nil

Ну я хз. Напиши тестовый проект и выложи, попробую смоделировать у себя.

[BLACK_RAIN]

Сообщение от min@y™

. Напиши тестовый проект и выложи, попробую смоделировать у себя

https://yadi.sk/d/W_YLfkLd3UyEpr
Кнопка "скачать" юзает "GetShortPathName", по-этому работает.
кнопка "TEST" юзает кавычки, по-этому не работает.

[min@y™]

Поковырялся. Не то, чтобы совсем успешно, но промежуточные результаты таки есть.

Чтоб не засирать свой ютуб-канал, видео на рутуб залил.

https://rutube.ru/video/dc0bbeeaaea8...555f4c972d99b/

Ниже - изменённый проектЪ.

[BLACK_RAIN]

Min@y
После просмотра видосика столько эмоций нахлынуло Первый раз в жизни школотой обозвали Как только не обзывали, но чтобы ШКОЛОТОЙ
Сначала страшновато было смотреть обзор на себя, но к середине видео я уже не мог сдержать улыбку. Особенно когда вы разбирались, зачем я запускаю cmd.exe и для чего нужен параметр /k.
Я , конечно же, есстно, ожидал кучу мата и негатива в свой адрес. Но хотел услышать более обоснованную аргументацию. А так это всё, как говорится, притянуто за уши (а в некоторых местах и за нечто иное).
Хороший обзорчик получился. Мне реально понравилось. Напомнило как Ваномас играет в очередную игру, которая по сути не такая уж и плохая, но просто ему не нравится.
Однако, хочу прокомментировать некоторые моменты:
1) Почему я прислал весь проект, а не тестовый?
Потому что это и так почти тестовый проект. Уменьшать его просто нет смысла. Он и так почти минималистичен. Я специально сделал кнопку "TEST", в коде которой написал одну строчку, в которой заключается вся проблема. А вы эту кнопку просто проигнорировали и начали допиливать всю программу и разбираться с ffmpeg. Хотя ffmpeg тут вообще не при чем. Хотели тестовый проект, а кнопку с надписью "TEST" отодвинули в сторону.
2) вы несколько раз упрекнули меня в том, что я где-то "стыбзил" код и что функция ShellExecute давно устарела.
Ну ок. Давайте разберемся. Во-первых: "стыбзил" не "где-то", а у GunSmoker'а. GunSmoker фигни не напишет. Во-вторых: эта обёртка является переходником на более новую функцию ShellExecuteEx. В-третьих: суть вопроса это не меняет. Хоть через CreateProcess запускай - результат один. Ничего не работает из-за вторых кавычек. Кстати, я об этом уже написал в одном из предыдущих постов. Видно, зря написал. Вы это даже не читали.
3) Откуда-то берутся символы #13#10
лол, что? Вы серьёзно? На этом моменте я себе лицо рукой пробил. И с этого момента понял, где смеяться.
Вы же код кнопки своими глазами видели. Видели, что там нет проверок на ошибки. Тогда, скажите, зачем вы вставили ссылку с переносом строки в конце? Мне просто логику понять хочется. Естевственно, это работать не будет.
Просили тестовый проект - получили тестовый проект. Сами накосячили, а меня еще и оскорбили. Типичный школьник: "Я уже взрослый. Я могу пить пиво на праздники".
Типичный программист: "Я программист. Я могу материть нуба вне зависимости от причины возникновения ошибки".
4) не переименовал компоненты, колхозник
Согласен, мой косяк. Но чего там переименовывать? Одно Memo, два edit'а и кнопка "TEST". И две строчки кода. Я не знаю, как в этом можно запутаться.
В своём предпоследнем посте я чётко написал: кнопка "скачать" работает. Кнопка "TEST" не работает. А вы полезли чинить РАБОЧУЮ кнопку. Зачем?
5) Для чего нужно "cmd.exe /k"?
Это нужно для того, чтобы окно консоли не закрывалось после выполнения команды. Не знать таких простых вещей, да еще при этом материться как бухой сапожник на человека, который всё правильно сделал - это, извините, Ваномас.
6) Для чего вообще нужна программа и есть ли аналоги?
Программа нужна для того, чтобы скачивать стримы с твича, GoodGame'а (и им подобным) в прямом эфире, а не капчерить их через BandiCam.
Такие программы, конечно же, существуют. Но все они работают плохо. Они либо не принимают ссылку, либо виснут при скачивании, либо не дают ввести имя output-файла. Либо, что еще хуже, просят вводить имя файла каждый раз. В результате чего, мы теряем драгоценные секунды стрима.
Для этого я и написал свой говнокод. Чтобы можно было просто вставить ссылку и нажать одну большую кнопку и все нужные параметры подставятся автоматически. БОЛЬШУЮ кнопку именно для того, чтобы второпях по ней было сложнее промахнуться. А не потому что я школьник и написал свою мега-крутую программу для скачивания. Чувствуете разницу?
----
И еще было много моментов, которые можно смешно прокомментировать. Но это не сейчас и не здесь.
Итак, в результате мы имеем: крутой программист, до того крутой, что может материть нуба как хочет, за 40 минут не смог запустить консоль windows так чтобы она не закрылась
Я признаю, что я изначально поставил вопрос немного неправильно (как обычно). Я не написал, что окно консоли не должно закрываться после выполнения команды.
Но у меня в коде написано cmd.exe /k. Это не просто так написано. Это априори без пояснения означает, что консоль не должна закрываться. Это должен знать каждый (тем более программист). Я не программист, но даже я это знаю! Это как знать, что функция ShellExecute давно устарела и юзать ее нельзя. А если кто-то этого не знает, то руки таким надо отрывать!

Сообщение от min@y™

Не то, чтобы совсем успешно, но промежуточные результаты таки есть.

Это полное фиаско, а не результаты

Сообщение от min@y™

Чтоб не засирать свой ютуб-канал, видео на рутуб залил.

Это видео войдёт в золотые анналы рутуба