Приветствую Вас Гость | RSS

Меню сайта

Реклама

Категории раздела
Speaker [7]
Аудио [51]
Видео [11]
Джойстик [2]
Запись звука [5]
Микрофон [3]

Наш опрос
Есть ли у Вас свой сайт?
Всего ответов: 48

Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0

Форма входа

Главная » Статьи » Мультимедиа » Видео

Проигрывать MPEG файл в Delphi-программе

Если в системе Windows MMSystem установлен декодер MPEG - используя компонент TMediaPlayer


procedure TForm1.Button1Click(Sender: TObject);
begin
with MediaPlayer1 do
begin
Filename := 'C:\Download\delphiworld.mpg';
Open;
Display := Panel1;
DisplayRect := Panel1.ClientRect;
Play;
end;
end;
Категория: Видео | Добавил: Angel (07.07.2008)
Просмотров: 510 | Рейтинг: 0.0/0
  Delphi Lab   Главная   Регистрация   Вход  
Интересная Цитата

Поиск

Магазин


Copyright MyCorp © 2025 Хостинг от uCoz