


Вопрос касается DELPHI (см. полный текст вопроса)
1. Нужно выполнить ffprobe по сотне моих видеофайлов и выдать их длительность.
Сам по себе ffprobe отлично отрабатывает и выдает 00.15 (15 сек)
Но исходник категорически не работает, т.к. там нужно "Don't forget to add Process to your Uses clause.", а Process в моей Д11 выдает ошибку Unit 'Process' not found.
procedure TForm1.Button1Click(Sender: TObject);
var fExec, Args : string;
begin
fExec := './ffprobe';
Args := '';
with TProcess.Create(self) do
begin
CurrentDirectory := '.';
Options := [poUsePipes];
CommandLine := fExec + ' ' + Args;
Execute;
Memo1.Lines.LoadFromStream(Stderr); // use the Stderr property instead of the Output property
end;
end;
Если есть какой-либо любой другой способ запустить командную ffprobe, дождаться его выполнения и получить коллбек в виде длительности видео (00.15) ?
Пробовал массу исходников, запустить командную строку они могут, а вот получить вывод их командной строки - нет.
2. Чем сейчас в Делфи парсят DHTML сайты?
Нужно штук 50 страниц фотостока спарсить на предмет ключевых слов.
Пробовал Twebbrowser и IDHttpd, но они вообще толком не работают с dhtml (а уж тем более по https) и до DOM не достучишься.
3. Какие сейчас средства для рекурсивного поиска по всему компу?
Нужно сразу искать и по шаблону ВСЁ (*.*), и по определенным расширениям файлов, типа .mp4 и .mov и .jpg .png до кучи.
Какой-то поиск я нарыл на базе FindFirst - FindNext, но он кривоватый, и к тому же завешивает наглухо форму в процессе поиска. И конечно же не показывает количество найденных файлов в реалтайме. Но он хоть работает, все остальные просто не функционируют.
По сути скорость мне особо не нужна, гораздо важнее надежность и вообще работоспособность поиска.
P.S Скачал миллионы исходников и изучил массу сайтов с попыткой решить мой вопрос, не вышло.
1. TProcess это вообще из Free Pascal, в дельфе используй DOSCommand из GetIt устанавливается в один клик
2. с этим ничего не изменилось, хочешь чтобы работало как тебе нужно - делай парсер сам
3. спорим в GetIt найдется что-то похожее, и не одно
Привет! К сожалению, я специализируюсь на помощи с использованием языка Python и не могу предоставить конкретные решения для Delphi. Однако, я могу посоветовать вам обратиться к сообществу Delphi разработчиков или к специалистам по данной теме для получения более точной помощи. Удачи в вашем проекте!