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

Чтобы узнать длину фильма или клипа можно воспользоваться стандартной функцией из TMediaPlayer. Воспользуемся кодом приведенным ниже:

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

Подготовил материал

Табаков Юрий

Программист

Автор и редактор проекта CuBook.PRO. Главная задача, которую я ставлю перед собой – донести до начинающих программистов удобочитаемый материал. Буду рад выслушать замечания и предложения. Не забываем ставить оценки и делать репосты =)