AVI в EXE?

← →
Alex Shulg © (2003-02-07 16:00) [0]

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

← →
AlexanderSK © (2003-02-07 16:08) [1]

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

← →
Alex Shulg © (2003-02-07 16:16) [2]

>AlexanderSK

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

← →
AlexanderSK © (2003-02-07 16:55) [3]

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

1 rcdata myvideo.avi

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

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

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

Все!

AVI в EXE? Найти похожие ветки