lebedev пишет:Нет, брать значения с камеры не подойдет. Наш софт специальным образом обрабатывает картинку с камеры (это цифровой стерео микроскоп), т.е. вариант напрямую работать с камерой не подойдет. Нужен какой-то программный API для стриминга, который мы сможем дергать у себя (в идеале). Либо какое-то налаженное межпроцессное взаимодействие (например, канал, как можно взаимодействовать с ffmpeg при записи видео на диск).
Идеально было, если бы вы рассказали подробнее, это помогло бы понять мне и другим, как вам помочь, ну предположу что ваша программа ведет непрерывную запись потока, возможно можно реализовать показ, через LIVESTREAMER, технология сыровата, но зато позволяет гнать поток, без ограничений качества, вот тема обсуждения технологии и профиль транскодирования для hms
https://hms.lostcut.net/viewtopic.php?id=227
Или заливайте поток на абстрактный сервер (можно использовать внутренний ftp, вот пример скрипта обработки, от автора hms)
const
FtpAddress = 'ftp://127.0.0.1';
procedure ProcessFolder(const aFolder: Variant; const aFolderPath: string);
var
i, iItemCount: Integer;
Folder, FolderItem, FolderItems: Variant;
sItemPath, sItemName: string;
begin
FolderItems := aFolder.Items;
iItemCount := FolderItems.Count;
for i := 0 to iItemCount - 1 do begin
FolderItem := FolderItems.Item(i);
sItemPath := FolderItem.Path;
sItemName := FolderItem.Name;
if FolderItem.IsFolder then begin
Folder := FolderItem.GetFolder;
ProcessFolder(Folder, aFolderPath + '\' + sItemName)
end else if HmsFileMediaType(sItemPath) = mtVideo then
HmsCreateMediaItem(sItemPath, mfVideoInternetTelevisionItemID, aFolderPath);
end
end;
var
MediaFolder: THmsScriptMediaItem;
Folder, Shell: Variant;
begin
HmsShowInformation('Поиск видео-файлов...');
try
MediaFolder := HmsFindMediaFolder(mfVideoInternetTelevisionItemID, FtpAddress);
if MediaFolder <> nil then
MediaFolder.DeleteChildItems;
Shell := CreateOleObject('Shell.Application');
Folder := Shell.NameSpace(FtpAddress);
ProcessFolder(Folder, FtpAddress);
finally
HmsHideInformation
end;
HmsDatabaseAutoSave;
ProcessMediaResult := True
end.
, после чего получите с него ссылку и ее уже транслируйте, через hms или можно заморочиться с сервисами для потоковой передачи материала (что то типа стриминга twitch) и уже с него, через подкаст (который вам придётся написать) к примеру ретранслировать уже, через hms, но что то мне подсказывает, что ваш выбор в сторону dlna серверов не лучшая идея, здесь много заморочек, которые могут и не привести к нужному результату
WD TV LS+Sony KDLS5600/Samsung UEF5400/Sony PS 3/Yamaha RX-V379/hms 2.33
Кладовая HMS (список полезных ссылок и инструкций)Временно отсутствую