AVI - Мультимедиа в Delphi

SLIMMUS · 07.09.2008, 18:19

Как можно воспроизвести видео на форме где угодно в формате AVI раньше как то делал. Год Delphi не занимался и уже почти все забыл

я раньше через апи функцию делал добовлял mmSYSTEM а код уже непомню.вот.

Код:

MediaPlayer1.DeviceType:= dtAutoSelect;
MediaPlayer1.FileName := 'C:\test.avi';
MediaPlayer1.Display:=Panel1;
MediaPlayer1.Open;
MediaPlayer1.Play;

у меня это есть а как с этими даннами пользоваться ума не преложу?

onixred · 29.03.2009, 15:58

MediaPlayer1.FileName :='C:\test.avi';
MediaPlayer1.Open;
mediaplayer1.display:=GroupBox1;
try if not mediaplayer1.AutoOpen then mediaplayer1.Open;
mediaplayer1.Play;
except
exit;
end;

mihali4 · 29.03.2009, 16:21

Нарушение правил раздела (п.1,2,3)
Трудности с чтением правил раздела?

07.09.2008, 18:19	#1
SLIMMUS Пользователь Регистрация: 07.09.2008 Сообщений: 11	AVI Как можно воспроизвести видео на форме где угодно в формате AVI раньше как то делал. Год Delphi не занимался и уже почти все забыл я раньше через апи функцию делал добовлял mmSYSTEM а код уже непомню.вот. Код: `MediaPlayer1.DeviceType:= dtAutoSelect; MediaPlayer1.FileName := 'C:\test.avi'; MediaPlayer1.Display:=Panel1; MediaPlayer1.Open; MediaPlayer1.Play;` у меня это есть а как с этими даннами пользоваться ума не преложу? Последний раз редактировалось rpy3uH; 29.03.2009 в 21:14.

29.03.2009, 15:58	#2
onixred работаю Пользователь Регистрация: 23.03.2009 Сообщений: 18	MediaPlayer1.FileName :='C:\test.avi'; MediaPlayer1.Open; mediaplayer1.display:=GroupBox1; try if not mediaplayer1.AutoOpen then mediaplayer1.Open; mediaplayer1.Play; except exit; end;

29.03.2009, 16:21	#3
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	Нарушение правил раздела (п.1,2,3) Трудности с чтением правил раздела?