Вниз
Скачать: 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
4-56393
s.kaster
2002-09-03 10:36
2002.10.17
Опять про Handle


14-56285
Yuraz
2002-09-23 19:24
2002.10.17
где найти хороший и беспл. firewall (или посоветйте хороший)


1-56050
Gaber
2002-10-08 13:11
2002.10.17
Возможно ли в одном Label1.Caption ввести текс в 2 строки


3-55915
alf_
2002-09-26 21:28
2002.10.17
DBGrid


7-56378
Stuart
2002-08-09 15:22
2002.10.17
Серийный номер диска




   Наверх