|
Вопрос # 1 905/ вопрос открыт / |
|
Набрал:
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormActivate(Sender: TObject);
begin
MediaPlayer1.Play;
end;
end.
теперь ролик воспроизводится автоматически! Что нужно дописать чтобы по окончании ролика форма закрывалась, а открывалась другая форма?Здравствуйте, уважаемые эксперты!
 |
Вопрос задал: Ученый (статус: 8-ой класс)
Вопрос отправлен: 16 сентября 2008, 16:29
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: Feniks
Здравствуйте, Ученый!
Допишите после Close
MediaPlayer1.Play;
Close;
P.S. Желаю удачи.
 |
Ответ отправил: Feniks (статус: Бакалавр)
Время отправки: 16 сентября 2008, 17:03
Оценка за ответ: 4
Комментарий к оценке: Извини! но больше не могу! немного неточно подсказал!
|
Мини-форум вопроса
Всего сообщений: 10; последнее сообщение — 24 октября 2008, 04:46; участников в обсуждении: 5.
|
|
Feniks (статус: Бакалавр), 16 сентября 2008, 16:57 [#1]:
А сами разве не догадываетесь ? 
|
|
|
Ученый (статус: 8-ой класс), 16 сентября 2008, 16:59 [#2]:
Нет не могу догадаться! Иначе не спрашивал бы!
|
|
Мережников Андрей (статус: Абитуриент), 16 сентября 2008, 17:06 [#3]:
Установи свойство MediaPlayer1.Notify:=true;
В обработчике события OnNotify
поставь form1.close.
|
|
|
Мережников Андрей (статус: Абитуриент), 16 сентября 2008, 17:09 [#4]:
Если сразу после MediaPlayer1.play поставить close, то воспроизведения не получится; форма сразу закроется, если только не установлено свойство MediaPlayer1.Wait:=true;
|
|
|
Ученый (статус: 8-ой класс), 16 сентября 2008, 17:11 [#5]:
Feniks, добавляю Close, форма открывается и сразуже закрывается, ролик не успевает проиграть!
|
|
Аксион (статус: 4-ый класс), 16 сентября 2008, 17:22 [#6]:
Ученый, прочитайте что вам написал выше Мережников Андрей...
Установи свойство MediaPlayer1.Notify:=true;
В обработчике события OnNotify
поставь form1.close.
|
|
|
Ученый (статус: 8-ой класс), 16 сентября 2008, 17:23 [#7]:
А как сделать чтобы вторая форма появлялась позади первой?
|
|
|
Аксион (статус: 4-ый класс), 16 сентября 2008, 17:26 [#8]:
Есле именно позади, то:
Form2.visible:=true;
Form1.BringToFront;
|
|
|
Feniks (статус: Бакалавр), 16 сентября 2008, 17:30 [#9]:
Значит пробуй как сказал Мережников Андрей.
|
|
Nasgool (статус: 2-ой класс), 24 октября 2008, 04:46 [#10]:
Если ты хочешь сделать сплеш-окно (т.е. примерно как в офисе при загрузке приложения чего-то показывает пока программа подгружает модули, а потом сплеш-окно исчезает и появляется основное окно приложения), то есть такое решение:
- создаешь все формы, что тебе нужны;
- главна форма приложения - это сплеш-окно;
- в обработчике onShow запускаеш проигрыватель (сдесь же можешь загрузить настройки из файла или реестра если нужны для твоей проги);
- в в обработчике события OnNotify у плеера; скрываешь сплеш-окно и показываешь нужное тебе окно (если нужно показать второе окно раньше окончания ролика, - пропиши ему form2.show и form1.setfocus сразу после запуска проигрывателя).
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
