Borland C++ Builder VCL FAQ - Как с помощью TMediaPlayer узнать, сколько длится фильм в миллисекундах и в кадрах?

ОГЛАВЛЕНИЕ


Как с помощью TMediaPlayer узнать, сколько длится фильм в миллисекундах и в кадрах?

MediaPlayer1->TimeFormat = tfFrames;  // устанавливаем формат времени в кадрах
ShowMessage("Длина в кадрах: " + IntToStr(MediaPlayer1->Length));
MediaPlayer1->TimeFormat = tfMilliseconds;  // устанавливаем формат времени в миллисекундах
ShowMessage("Длина в миллисекундах: " + IntToStr(MediaPlayer1->Length));