Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.05;
Скачать: CL | DM;

Вниз

tmediaplayer   Найти похожие ветки 

 
race1   (2004-08-18 11:24) [0]

хочу сделать tmediaplayer в рантайме, для определения (только определения) продолжительности файла. дело происходит в не визуальном компоненте, т.е. окошка у него нет (и делать такое public св-во, что бы компоненту передали хендл родительского приложения, очень не желательно)


     MediaPlayer := TMediaPlayer.Create(nil);
     MediaPlayer.FileName := AFileName;
     MediaPlayer.Open;

     MediaPlayer.TimeFormat := tfMilliseconds;
     Duration := MediaPlayer.Length
     MediaPlayer.Free;

ругается на open; что нет parent окна. какое ему можно подсунуть общедоступное окно (или другими средствами) что бы определить-таки продолжителность?


 
ssk ©   (2004-08-18 11:47) [1]

MediaPlayer := TMediaPlayer.Create(nil);
MediaPlayer.Parent:=Self;
MediaPlayer.FileName := AFileName;
MediaPlayer.Open;


 
race1   (2004-08-18 12:15) [2]

мой компонент не визуальный, TComponent, TMediaPlayer.Parent: TWinControl, т.е. жестоко не подходит


 
Mihey_temporary ©   (2004-08-18 13:48) [3]

Продолжительность файла определяй из файла либо при помощи MCI. Если надо, могу кинуть инфу про WAV и MP3 из файла, либо про поддерживаемый звук через MCI комманды.


 
race1   (2004-08-18 14:12) [4]

лучше про узнавание длины через mci, потому что мне нужно не wav и mp3 узнать длину, а у других файлов


 
Mihey_temporary ©   (2004-08-18 14:31) [5]

А каких файлов? Видео или видео и аудио вместе?


 
race1   (2004-08-18 14:53) [6]

пока mpeg (videocd). я, в принципе, парсю файл вручную, получаю битрейт аудио+видео, но при вычислении продолжительности (размер файла \ битрейт) получаются погрешности. mci даёт точный результат, поэтому его и хочу использовать


 
Mihey_temporary ©   (2004-08-18 15:43) [7]

Попробуй VFW (в примере см. AVIFileInfo):
http://www.swissdelphicenter.ch/torry/showcode.php?id=1180


 
race1   (2004-08-18 15:45) [8]

нет, не то, к сожалению... мне нужно именно mpeg. ну и wma до кучи :) ави мне не надо


 
Mihey_temporary ©   (2004-08-18 17:42) [9]

Тогда смотри исходники TMediaPlayer.


 
race1   (2004-08-18 17:53) [10]

к сожалению, не подходит :( слишком долго грузит файлы из которых я получаю нужную информацию за доли секунды

только щас понял его тормознутость



Страницы: 1 вся ветка

Текущий архив: 2004.09.05;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.052 c
14-1092976591
Vlad Oshin
2004-08-20 08:36
2004.09.05
http://www.liveinternet.ru/images/attach/32750/1054196.jpg


14-1092662426
nasty
2004-08-16 17:20
2004.09.05
создание справочной системы по спроектированным классам


14-1092605401
Baron
2004-08-16 01:30
2004.09.05
Фотоприколы


3-1092168310
Zif
2004-08-11 00:05
2004.09.05
Можно ли в ADOQuery соединить несколько таблиц?


1-1092821913
Mox Fulder
2004-08-18 13:38
2004.09.05
Minimize