![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
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]Статья же есть.На этом же сайте,мля.
Посмотреть в лом???