проигрывание видео из потока

[Rusavushka]

в общем есть такая задача:
я написала проигрыватель видео, который работает с помощью DirectX. Соответственно граф фильтров автоматически строится и т.д. Всё работает. Не могу найти одно: если у меня на входе не путь к файлу, а сам поток TStream, как мне его рендерить? (т.е че писать вместо pGraphBuilder.RenderFile(StringToOleStr(filePath), ''))

помогите девушке пожалуйста =)

[alexplev]

Девушка, поток откуда-то берется, то есть есть фильтр источник потока. Например, файл на диске, устройство захвата (capture), URL и т.д. А ваш поток откуда взялся? Фильтр вашего потока, должен быть включен в граф как источник, т.е. на самом входе проигрывателя. Далее этот поток обрабатываеся. TStream из воздуха не возникает.

[Rusavushka]

дык ясен пень, что из воздуха не берётся. поток берётся из файла и декриптуется. писать его пользователю обратно в файл на диск -- крайне некрасиво)) значит всё-таки фильтр. не подскажите, какой? я в библиотеках DirectX не смогла найти

[LWN]

Попробуй так:
begin
if not OpenDialog1.Execute then exit;
Begin

{вызываем RenderFile - граф фильтров строится автоматически}
MyGraphBuilder.RenderFile(StringToOleStr(OpenDialog1.FileName), '');
_________________
- У вас есть лыжные ботинки 55-го размера?
- Какого???
- 55-го…
- А зачем вам лыжи?!

[Rusavushka]

пробовала, работает. но задача состоит в СОВСЕМ ДРУГОМ!!

[LWN]

А может тебе так надо cделать:

procedure TForm1.openbtnClick(Sender: TObject);
var
I: integer;
s: string;
_hr: Hresult;
wFile: array[0..(Max_path * 2) - 1] of char;
begin
if OpenFileDialog.execute then
begin
s := OpenFileDialog.filename;
if s='' then exit;
MultiByteToWideChar(CP_ACP, 0, pchar(s), -1, @wFile, MAX_PATH);
_hr := g_pGraphBuilder.renderfile(@wfile, nil); // Filter Graph,nil

if failed(_hr) then
begin
showmessage('........');
exit;
end;
....................................
............................
end;

Если нет, то покажи код, где у тебя проблема.
_________________
- У вас есть лыжные ботинки 55-го размера?
- Какого???
- 55-го…
- А зачем вам лыжи?!