Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.23;
Скачать: CL | DM;

Вниз

TMediaPlayer   Найти похожие ветки 

 
gyry-9   (2004-03-06 03:50) [0]

Подскажите пожалуйста, как пользоваться TMediaPlayer. Если просто ставлю на форму, то при запусе пишет ошибку: "no mci device open". Что делать?


 
ИМХО ©   (2004-03-06 20:46) [1]

Там в хэлпе пример есть:

DeviceType, Display, Open, Play example

var sWinDir: String;

   iLength: Integer;
begin
// Initialize Variable
iLength := 255;
setLength(sWinDir, iLength);
iLength := GetWindowsDirectory(PChar(sWinDir), iLength);
setLength(sWinDir, iLength);

With MediaPlayer1 do begin
    Filename := sWinDir + "\Clock.avi"; //specify video file
    DeviceType := dtAVIVideo; //set Device compatibility to AVI
    Display := Panel1; //Set display device to a TPanel
    Open;
    Play;
end;
end;



Страницы: 1 вся ветка

Текущий архив: 2004.05.23;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.048 c
1-1084201318
ceval
2004-05-10 19:01
2004.05.23
вывести дату обновления файла в Label


1-1083851918
delphiman
2004-05-06 17:58
2004.05.23
DBGrig


1-1083853109
Анонимщик
2004-05-06 18:18
2004.05.23
Критические секции


14-1083743684
X9
2004-05-05 11:54
2004.05.23
Отображение кода программ в форумах.


14-1083399235
electric
2004-05-01 12:13
2004.05.23
Server