Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как запустить видео файлы программно [D3, D5, Win95/98, NT4, Win2k]


JibSkeart ©   (2002-04-11 16:13:00) 

Есть два видео формата, проще сказать DV500,DC30
но суть не в этом мне нужно сделать как бы плей лист в этом тоже нет проблем
но я знаю где лежат файлы и мне нужно восроизвести их по порядку
тоесть сделать так же как и при двойном клике на этот файл
(просто хочется набить список и смотреть все подряд неотвлекаясь)
Какими функциями хотя бы пользоватся и как будет лутьше
Думаю изложил более менее понятно...

Заранее благодарю


JibSkeart   (2002-04-11 19:26:00) [1]

Благодарствую !


VID   (2002-04-11 19:00:00) [2]

...
USES SHELLAPI;
...


Procedure RunFile(FileName:String);
begin
ShellExecute(0,nil,pchar(filename),nil,pchar(extractfilepath(filename)),sw_normal);
end;


JibSkeart   (2002-04-11 18:30:00) [3]

А примерчик ??
так как немогу найти к ShellExecute
сопостовимые Unit-ы и комоненты !


AFROLOV   (2002-04-11 16:24:00) [4]

Проиграть файл можно с помощью ShellExecute(0,"open",...)
при этом будет запущена программа ассоциированная с данным типом файлов.
Или почитай справку по MCI(ключевые слова: MCI_DEVTYPE_DIGITAL_VIDEO, MCI_OPEN, MCI_PLAY, mciSendCommand, mciSendString)


Наверх

Титульная страница Поиск, карта сайта Написать письмо