Средства создания мультимедийных приложений
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: реферат на социальную тему, сочинение 6
| Добавил(а) на сайт: Кочубей.
Предыдущая страница реферата | 1 2 3 4 | Следующая страница реферата
Рис.4: Начальный вид проекта
Сохраните проект, запустите его, выберите нужный файл и дважды щелкните на него мышкой. MediaPlayer должен воспроизвести этот файл в отдельном окне.
Как уже говорилось выше, видеоролик можно воспроизводить внутри формы, например, на панели. Давайте слегка модифицируем проект и добавим туда панель TPanel (см. рис.5). В св-ве Display для MediaPlayer1 укажите Panel1. Нужно убрать надпись с панели (Caption)
и св-во BevelOuter = bvNone. Чтобы переключаться при воспроизведении с окна на панель - поместите TСheckBox на форму и в обработчике события OnClick для него запишите:
procedure TForm1.CheckBox1Click(Sender: TObject);
var
Start_From : Longint;
begin
with MediaPlayer1 do begin
if FileName='' then Exit;
Start_From:=Position;
Close;
Panel1.Refresh;
if CheckBox1.Checked then
Display:=Panel1
else
Display:=NIL;
Open;
Position:=Start_From;
Play;
end;
end;
Запустите проект и воспроизведите видеоролик. Пощелкайте мышкой на CheckBox.
· · Рис.5: Добавлена панель для воспроизведения видео и переключатель окно/панель.
Рекомендуем скачать другие рефераты по теме: деловое общение реферат, реферат на тему народы.
Категории:
Предыдущая страница реферата | 1 2 3 4 | Следующая страница реферата
Главная