Как узнать число кадров AVI файла, и выяснить как долго будет проигрываться этот файл
|
Звонок в фирму: - Сколько байтов в вашем компьютере? - ??? Сколько надо, столько и будет! - А сколько надо для мультивидео? |
procedure TForm1.Button1Click(Sender: TObject);
begin
MediaPlayer1.TimeFormat := tfFrames;
ShowMessage('Number of frames = ' + IntToStr(MediaPlayer1.Length));
MediaPlayer1.TimeFormat := tfMilliseconds;
ShowMessage('Number of milliseconds = ' + IntToStr(MediaPlayer1.Length));
end;
|