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

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

AVI в EXE? [D5]


Alex Shulg ©   (2003-02-07 16:00:00) 

Привет, народ!
Как засунуть avi-файл в exe-шник и подключить его к TAnimate?


AlexanderSK   (2003-02-07 17:05:00) [1]

Далее в само программе:
var
X: TResourceStream;
begin
X := TResourceStream.CreateFromID(HInstance, 1);
X.SaveToFile("c:\1.avi");
X.Free;
Animate.Filenae := "c:\1.avi";

Все!


AlexanderSK   (2003-02-07 16:55:00) [2]

1. создаем "текстовый" файл myres.inf:

1 rcdata myvideo.avi

2. компилим его компилятором ресурсов:
brcc32.exe data.inf

3. включаем скомпилированный файл в приложение:
{$R myres.res}


Alex Shulg   (2003-02-07 16:16:00) [3]

>AlexanderSK

Не подскажешь, как это сделать? Желательно пример


AlexanderSK   (2003-02-07 16:08:00) [4]

Компили его как ресурс в exe. А потом выгружай и проигрывай!


Наверх

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