Verwenden von IAMMediaContent

[EWeiss]

Ok! Sorry hat sich erledigt.
So geht es!

Delphi-Quellcode:

function TEVMRPlayer.GetYoutubeFilterTitle(var Title: PWideChar): HRESULT;
var
  MediaContent: IAMMediaContent;
begin

  Result := E_FAIL;

  if not Assigned(srcFilter) then
    exit;

  if IsUrl then
  begin
    if DYDYoutubeFilter <> nil then
    begin
      srcFilter.QueryInterface(IID_IAMMediaContent, MediaContent);
      Result := MediaContent.get_Title(Title);
      if not SUCCEEDED(Result) then
        ReportError('YoutubeFilterTitle fails', Result);
    end;
  end;
end;

srcFilter ist in dem Fall
hr := GraphBuilder.AddSourceFilter(PWideChar(MediaFile), 'SRC01', srcFilter);

Was für ein Aufwand bis das mal alles steht.
Pic von Vimeo, YouTube

Jetzt fehlt noch die Video Auflösung und die Laufzeit.

gruss