Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Media-Player-Problem

    Delphi
    by Fussball-Robby, 2. Aug 2008
  Die Größe des Videos erhälts du über TMediaPlayer.DisplayRect. Hier ein kleines Beispiel, um die Größe des Panels anzupassen:procedure ResizeDisplay(MP: TMediaPlayer);
  begin
  with MP do
  begin
  Display.Width := DisplayRect.Right - DisplayRect.Left;
  Display.Height := DisplayRect.Bottom - DisplayRect.Top;
  end;
  end;
  
  procedure TForm1.Button1Click(Sender: TObject);