Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Flash в Делфийной проги без FlashPlayer'a [D7, WinXP]


CAHEK ©   (2004-04-04 23:55:00) 

Можно ли как-нибудь запихать *.swf в DLL'ку или в непосредственно саму прогу так,чтобы все радотало без FlashPlayer'a,(И можно ли такое же сделать с Java-апплетом)?


CAHEK   (2004-04-07 00:18:00) [1]

Блин!Что-то у меня из EXE'шника SWF'ку не грузит,TSockwaveFlash пустой!Какмне грамотно SWF'ку пихнуть (наверное через LoadResource(),но я синтаксиса не знаю,а в Delphi'йном HELP'е ничего нет!).
Да,кстати если уж тема про Flash зашла,знает ли кто-нидудь где можно путный учебник по ActionScript'у закачать,буду очень благодарен!


CAHEK   (2004-04-06 21:52:00) [2]

Мне не наде себе FlashPlayer устанавливать,надо так,чтобы те у кого его нет без проблем SWF'ку,которая в DLL'ке,смотрели.
И еще если компонент TShockWaveFlash и является FlashPlayer'ом (У него свойства,методы и т.д. говорят сами за себя),то можно ли без настоящего FlashPlayer'a SWF'ки в проге через него смотреть????


xShadow   (2004-04-06 12:07:00) [3]

Ещё вариант установки плеера
закачиваешь http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab
раскрываешь, смотрим. Там 4 файла есть inf есть ocx есть даже EXE


xShadow   (2004-04-06 12:05:00) [4]

{Register the OCX File}
// set LibraryDir
// LibraryDir := ExtractFilePath(Application.ExeName);
// or
// LibraryDir := SystemDir;

aHandle := LoadLibrary(PChar(LibraryDir + 'flash.ocx'));
if ( aHandle >= 32 ) then
begin
aFunc := GetProcAddress( aHandle, 'DllRegisterServer' );
if Assigned( aFunc ) then
 begin
  GetShortPathName( PChar(LibraryDir + 'flash.ocx'), aShortPath, sizeOf(aShortPath));
  aCommand := Format( '%s\regsvr32.exe /s %s', [SystemDir, aShortPath] );
  WinExecAndWait32( aCommand, SW_HIDE );
 end;
FreeLibrary( aHandle );  
end;


Cash   (2004-04-05 18:59:00) [5]

Я вон ваще умняка дал :)))))). У меня Д6; беру, в меню установки компонентов ActiveX, устанавливаю компонент ShockWaveFlash.
Далее, шлеп на форму и в свойствах компонента Moveуказываю полный путь к файлу *.swf. Потом, если надо, AutoPlay -> true, а если нет, то Flash.Play;
Ну как такой путь.
Да, если у тебя Flash не установлен, то и не ищи ShockWaveFlash среди устанавливаемых.


tv   (2004-04-05 10:32:00) [6]

ищешь файл flash.ocx, создаешь инсталляцию для своей проги с помощью какого-нибудь инсталлятора (я использовал WISE INSTAll MASTER), пихаешь в инсталляцию помимо своей проги и flash.ocx с параметром саморегистрации - и у тебя есть флэш-плейер на тачке, где тебе надо прокрутить флэш-ролик. Этот способ скажем в лоб. А можешь просто запихнуть flash.ocx в дллку как ресурс (в свой екзешник не рекомендую из-за увеличения размера проги) и проверить если флэш-плейер не установлен на машине, то извлечь файл из ресурса и зарегистрировать файл flash.ocx с системе как простую дллку с помощью утилиты REGSVR32.EXE. реализация за тобой. как запихнуть файл в ресурс есть на это м сайте. использовать утилиту регистрации можно через API функцию ShellExecute.


xShadow   (2004-04-05 09:20:00) [7]

Запихнуть можно, но не без Flash'а.
http://www.delphiflash.com


CAHEK   (2004-04-05 07:38:00) [8]

Чтото я ее не на нашел,да и суть вопроса:"Можно ли как-нибудь запихать *.swf в DLL'ку или в непосредственно саму прогу так,чтобы все радотало без FlashPlayer'a,(И можно ли такое же сделать с Java-апплетом, только без JVM)?"


GanibalLector   (2004-04-05 02:37:00) [9]

Статья же есть.На этом же сайте,мля.
Посмотреть в лом???


Наверх

Титульная страница Поиск, карта сайта Написать письмо