Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Не могу разобраться с кодом.Помогите ПОЖАЛУЙСТА!!! [D7, WinXP]

Dima © (2008-03-17 20:00:00)
При переходе воспр. с клипа в mp3 не закрывает panel.При переходе воспроизведения с mp3 на клип-нормально.Из-за этого
бага потерял уже кучу времени,а понять в чем проблема не могу.

Задача:При воспр. музыки-панель не видно,а при воспр. видео-
отображается на весь экран и при окончании композиции панель
опять исчезает. Код привожу ниже:

procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
form1.Panel1.Visible:=false;
form1.Memo1.Lines.Delete(0);
form1.ListBox3.Items.Delete(0);
if form1.ListBox3.Items.Count>0 then
begin
form1.Panel1.Width:=1024;
form1.Panel1.Height:=768;
MediaPlayer1.FileName:=memo1.Lines.Strings[0];
Mediaplayer1.Open;
form1.MediaPlayer1.Display:=form1.Panel1;
mediaplayer1.DisplayRect:=rect(0,0,1024,768);
mediaplayer1.Play;
end;
end;

Кто может ПОМОГИТЕ ПОЖАЛУЙСТА,я ВАС ОЧЕНЬ прошу!!!!!!!!!

ЦУП (2008-03-18 13:07:00) [1]
а почему form1.Panel1.Visible:=только в одном месте?

Dima (2008-03-17 20:46:00) [2]

> mediaplayer1.close?

Пробовал не помогает.Спасибо за совет.

Семеныч (2008-03-17 20:37:00) [3]
mediaplayer1.close?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »