VPF::Получение списка кодеков в системе

CynicRus

Дата 1.7.2012, 12:16 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 248
Регистрация: 31.5.2012

Репутация: 2
Всего: 5

Ещё раз приветствую форумчан. На сей раз проблема с получением списка кодеков установленых в системе. Пытаюсь получить с помощью модуля vfw.pas следующим образом

Код


 while true do
 begin
  ii.dwSize := SizeOf(ii);
  if not ICInfo(ICTYPE_VIDEO, Iterator(i), @ii) then
   Break;
  ic := ICOpen(ICTYPE_VIDEO, ii.fccHandler, ICMODE_QUERY);
  if ic = 0 then
   Continue;
  try
   if ICCompressQuery(ic, @BitmapInfoHeader, nil) = 0 then
   begin
    ICGetInfo(ic, @ii, SizeOf(ii));
    Name := '';
    for j := 0 to 15 do
     Name := Name + ii.szName[j];
    List.add(FourCCToString(ii.fccHandler) + ' ' + Name);
   end;
  finally
   ICClose(ic);

однако на выходе я имею пустой список. Под отладчиком ICCompressQuery возвращает все что угодно, только не 0. Каким образом можно получить список кодеков с помощью video for windows?
PS: ОС Win 7 + Delphi XE.
PPS: При этом структура в TICInfo заполнена следующим образом:

Это сообщение отредактировал(а) CynicRus - 1.7.2012, 12:31

Присоединённый файл ( Кол-во скачиваний: 5 )

otl.jpg 193,28 Kb

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Звук, графика и видео \| Следующая тема »