(Resolvido) Delphi Chromium flash player

[robinhocne]

Estou montando um simples browser com o Chromium, porém quando abro um site em flash ele pede para instalar o plugin do flash, queria saber se existe alguma forma de carregar o flash para não precisar instalar no computador, ter alguma dll não sei...
Alguém sabe como ?
componente de Chromium 
https://delphimaniaco.wordpress.com/2016/03/15/utilizando-o-navegador-chrome-no-delphi/

[Jhonas]

realmente é uma dll que é necessario

digite no seu browser  chrome:\\plugins

dentre os plugins instalados deverá achar esse

Adobe Flash Player - Versão: 21.0.0.197
Shockwave Flash 21.0 r0
Nome:    Shockwave Flash
Descrição:    Shockwave Flash 21.0 r0
Versão:    21.0.0.197
Local:    C:\Arquivos de programas\Google\Chrome\Application\49.0.2623.110\PepperFlash\pepflashplayer.dll
Tipo:    PPAPI (fora do processo)

Desativar

a dll é esta : pepflashplayer.dll

veja neste link

http://sejalivre.org/como-instalar-a-ultima-versao-do-flash-player-no-chromium/

abraço

 

[robinhocne]

Então, Jhonas, mas pelo delphi como eu consigo ? veja meu erro:

 

http://prntscr.com/d4b8wd

[Jhonas]

o aviso é: para que possa visualizar a pagina voce deve instalar o adobe flash player  versão 11 ou superior

nesse link voce vai achar várias versões para baixar

https://pt.dll-files.com/pepflashplayer.dll.html

voce pode importar a dll para o seu exe ( mas vai ficar muito grande ) , ou voce pode deixa-la junto com o exe na mesma pasta

abraço

 

[robinhocne]

entendi, consegui resolver aqui Jhonas da seguinte maneira;

 

program Project1;

uses
  Forms,
  ceflib,
  cefvcl,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

procedure CustomCommandLine (const processType: ustring; const commandLine: ICefCommandLine);
begin
    commandLine.AppendSwitch('--enable-system-flash');
end;

begin
    CefCache := 'cache';
    CefOnBeforeCommandLineProcessing := CustomCommandLine;
    CefSingleProcess := False;
       if not CefLoadLibDefault then Exit;

  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.