Кодек то у меня есть и все играет, но мне нужно, чтобы моя прога читала этот формат.
Bill Gates
27.06.2006 1:35
Читать можно и при помощи стандартных компонентов, лишь бы были кодеки. Но дело в том, что компонент MediaPlayer распознает тип файла по расширению, и 3gp, по его мнению, на самом деле .mpg. Т.е. чтобы играть файлы, нужно сначала создавать временную копию исходного файла .3gp с расширением .mpg, а потом играть его. Вот код события OnCanClose для OpenDialog (предположим, мы имя файла получаем из него):
procedure TForm1.OpenDialog1CanClose(Sender: TObject; var CanClose: Boolean); begin CopyFile(PAnsiChar(OpenDialog1.FileName),'C:\My3gpPlayerTemp.mpg',true); MediaPlayer1.FileName:='C:\My3gpPlayerTemp.mpg'; MediaPlayer1.Open; MediaPlayer1.Play; end;
При закрытии формы нужно удалять временный файл процедурой DeleteFile.
зы. Для воспроизведения нужны кодеки , у меня стоит KLite Codec Pack 1.52.
Klose
27.06.2006 3:10
Хм, интересненько, надо попробывать, спасиб.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.