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

Братья!!! Как Flash засунуть в exe и из него запустить?   Найти похожие ветки 

← →
Viktor1 ©   (2002-10-08 10:59) [0]

Как Flash засунуть в exe и из него запустить?
Пробовал в файл .res как звук, JPG... запихивают (нашёл в HELP)не получается.Свойству movie не могу присвоить тип TPointer. Помогите!!! Спасибо!!!


← →
REA   (2002-10-08 11:02) [1]

Засунуть в ресурс наверно как обычно, а проиграть - где то я компонент видел, но не помню где. Может он и из ресурса сразу играет?


← →
REA   (2002-10-08 11:03) [2]

PS: ActiveX наверно можно прикрутить


← →
Viktor1 ©   (2002-10-08 11:15) [3]

REA: попробуй вспомни!!! :)
В .res засунул, а вот проиграть ни как. Может кто видел где другие компоненты, сообщите!


← →
REA   (2002-10-08 11:17) [4]

А ты какой используешь компонент? И что именно делаешь - кинь код.


← →
Pat ©   (2002-10-08 11:29) [5]

http://delphi.mastak.ru/articles/delphi-flash.html


← →
Viktor1 ©   (2002-10-08 12:07) [6]

Использую компонент ShockwaveFlash1,
пишу примерно так:

var FindHandle, ResHandle: THandle;
ResPtr: Pointer;
begin
FindHandle:=FindResource(HInstance, "<Имя вашего ресурса>", "WAVE");
if FindHandle<>0 then begin
ResHandle:=LoadResource(HInstance, FindHandle);
if ResHandle<>0 then begin
ResPtr:=LockResource(ResHandle);
if ResPtr<>Nil then
ShockwaveFlash1.movie:= ??? что присвоить;
UnlockResource(ResHandle);
end;
FreeResource(FindHandle);
end;
end;


← →
Viktor1 ©   (2002-10-08 12:10) [7]

Pat: Читал, только у мены вопрос другой.


← →
REA   (2002-10-08 12:15) [8]

Нет под рукой документации по методам и свойствам ShockWave, но Movie скорее всего не пойдет - там имя файла должно быть. Нужно другое свойство или во временный файл ресурс сохранять.


← →
Viktor1 ©   (2002-10-08 16:14) [9]

Может кто ещё что добавит!!!



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

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



Память: 0.46 MB
Время: 0.011 c
1-56107
ESV
2002-10-08 15:33
2002.10.17
Модальная форма из DLL


7-56388
2UT
2002-08-07 12:45
2002.10.17
И снова о СОМ - портах (скорость выше 115200 ???)


1-56095
Феликс
2002-10-08 21:07
2002.10.17
А почему так долго?


1-56060
Keplin Sergey
2002-10-04 16:09
2002.10.17
Как можно проверить строку на наличие хотябы одной буквы?


3-55955
Woolen
2002-09-24 16:08
2002.10.17
Кроссплатформенная БД




   Наверх