Вниз
Скачать: CL | DM;

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

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







← →
Proton ©   (2002-07-13 19:34) [3]

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



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
1-11245
Dok_3D
2002-10-25 13:22
2002.11.04
Передача больших по значению параметров на удаленные COM-сервера.


4-11565
chsv
2002-09-16 18:57
2002.11.04
как изменить в сис.меню Alt+F4 на Ctrl+F4?


14-11428
Tornado
2002-10-15 08:18
2002.11.04
Как программно удалить файл(ы)?


1-11276
bearoman
2002-10-23 12:00
2002.11.04
Нужены компоненты графические (датчиков, градусников)


14-11413
1g0r
2002-10-14 18:42
2002.11.04
Проблема с почтовыми клиентами (Outlook)




   Наверх