A:  Note:  the DisplayRect property is modified when the avi file is opened.  Therefore,  setting or getting the DisplayRect must be done after the file is opened.

var
  t: trect;
begin
  with MediaPlayer1 do begin
    DeviceType := dtAutoSelect;
    visible := false;
    FileName := InputBox('AVI', 'Enter AVI file name', 'c:\windows\borland.avi');
    display := panel1;
    open;
    t := DisplayRect;
    caption := IntToStr(t.left) + ' : ' + IntToStr(t.top) + ' : ' + IntToStr(t.right) + ' : ' + IntToStr(t.bottom); {This is it!}
    rewind;
    play;
  end;
end;