Вниз
Скачать: 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.022 c
8-56235
Vanek_
2002-06-02 08:14
2002.10.17
Помогите с DelphiX


4-56411
NAlexey
2002-09-03 13:33
2002.10.17
Как узнать нажат ли CTRL


1-56130
NorthMan
2002-10-09 12:54
2002.10.17
Как можно послать QReport на принтер, минуя очередь печати?


1-56143
umr
2002-10-07 07:57
2002.10.17
Не знаю в чем проблема.


14-56297
MaximatorVeter
2002-09-23 17:27
2002.10.17
Так возможно ли работать эффективно?




   Наверх