AVI в ЕХЕ файле

← →
loon © (2002-07-12 14:54) [0]

Уважаемые дамы и господа!
Помогите ради-христа-ради...
Нужно АВИшник (маленький) "впихнуть" в ЕХЕшник,
а потом показать его. "Впихнуть" я его впихнул, через
ресурсы, а вот как показать его?

← →
Mirovodin © (2002-07-12 21:24) [1]

Смотри мою статью на DelphiGFX ( http://delphigfx.mastak.ru) в разделе Док-я 2D "Способы хранение графики в играх и бизнес приложениях" там рассказано о том как считывать любую ниформацию из секций PE файла.

← →
msts (2002-07-13 18:09) [2]

файл описания ресурсов (*.rc - текстовый)
описать ресурсы и скомпилить.

\Borland\Delphi3..X\Bin\brcc32.exe - компилятор ресурсов
на выходе RES файл (*.res - бинарный)
нужно настроить к нему пути или просто копирнуть в исходный каталог

компиляция: brcc32.exe BUSYAVI.RC

Busyavi.rc - содержание:

#define AVI_4 4
#define AVI_3 3
#define AVI_2 2
#define AVI_1 1
#define AVI AVI

AVI_1 AVI "time.avi"
AVI_2 AVI "go_found.avi"
AVI_3 AVI "wait.avi"
AVI_4 AVI "warning.avi"

...
соответсвенно где BUSYAVI.RC там и *.avi

подключение:

uses Forms;

{$R Busyavi.res}

type
...

использование:

FStateAnimate : TAnimate;

FStateAnimate.ResId:=1; или 2..4

так же есть другие варианты...

проблемма в том что работает только с несжатым авишником
но это попровимо - ведь можно потом сжать программу с помощью UPX (с параметром --best)
если надо то пиши на мыло - кину пример (только не забудь дописать по какому поводу)

AVI в ЕХЕ файле Найти похожие ветки