mit DSPack Höhe, Breite eines Videos ermitteln

[Mazel]

Hi,

das Thema ist schon etwas alt daher hatte ich, nachdem ich keine Antwort erhalten habe, keine Antwort geschrieben. So mache ich es nun um die Höhe und Breite zu ermitteln, da wie ich hier schon geschrieben habe, das mit IBasicVideo2 nicht funktionieren will:

Delphi-Quellcode:

procedure TForm1.FilterGraphGraphVideoSizeChanged(sender: TObject; Width, Height: Word);
begin
 //da beim Öffnen eines Video diese Prozedur aufgerufen wird, funktioniert das auch
 VideoWindow.Width:=Width;
 VideoWindow.Height:=Height;
 ClientWidth:=Width;
 ClientHeight:=Height + 90;
end;

Gruß
Mazel