Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.02.2012, 02:42   #1
GoodDA
фрилансер
Форумчанин
 
Аватар для GoodDA
 
Регистрация: 18.07.2008
Сообщений: 107
По умолчанию DSPack - перевести вывод из консольной на компонент на форме

Помогите совместить две стандартные демки из DSPack
1я это проигрывание файла из памяти - MemFile
2я проигрывание файлов на форме с компонентами - PlayWin

Код:
function SelectAndRender(AReader: TBCMemFileReader;  var AFG: IFilterGraph): HResult;
var
  _Builder: IGraphBuilder;
  _Pin: IPin;
begin
{1}  Result := CoCreateInstance(CLSID_FilterGraph, nil, CLSCTX_INPROC,IID_IFilterGraph, AFG);
//{2} Result := FormPlayWin.FilterGraph.QueryInterface(IID_IFilterGraph, afg);
  Result := AFG.AddFilter(AReader, nil);
  Result := AFG.QueryInterface(IID_IGraphBuilder, _Builder);
   _Pin := AReader.GetPin(0);
  Result := _Builder.Render(_Pin);
end;
первая демка консольная и устройство воспроизведения создается
вроде в строке {1}

но мне надо использовать уже готовый компонент на форме - FilterGraph: TFilterGraph;

Пробовал менять {1} на {2} но тогда вылазит ошибка в следующей строке.

Подскажите как сделать вывод именно в компонент который уже есть на форме.
GoodDA вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как проверить существует ли определённый компонент на форме? Ksardas13 C++ Builder 1 06.04.2011 04:22
Компонент на форме -> работа компонента до создания формы YarUnderoaker Компоненты Delphi 2 26.07.2010 15:32
Непрозрачный компонент на почти прозрачной форме Marsel737 Общие вопросы Delphi 1 15.05.2010 19:22
Как перевести WinXP в ждучий режим с помощью кнопки на форме? Bill Gates Win Api 3 05.01.2008 12:14
компонент в котором в табличной форме осуществлялся вывод вводимых мной данных Максим-2 Компоненты Delphi 1 22.07.2007 13:31