Flash player izin verme

[Lord_Ares]

(05-10-2017, Saat: 11:37)engerex Adlı Kullanıcıdan Alıntı: Acaba flash player yüklemek mi gerekiyor? Bu şekilde dener misin?

Bütün hepsi yüklü , ayrıca farklı bilgisayarlarda farklı işletim sistemi ile de denedim. Sayfa açılıyor video yükleniyor gibi görünüyor ama sonunda resimde görülen hatayı verip kalıyor. Şöyle bir test yaptım yeni windows kurup , gerekli adobe ürünlerini kurdum.  Siteyi normal explorer veya choreme ile açtığımda bana flash player izin vermemi istedi. Özelikle izin vermediğimde gördüm ki aynı hatayı aldım. Tekrar sayfayı yenileyip izin vererek açtığımda sorunsuz çalıştı.
O yüzden Twebbrowserada böyle bir izin vermem mi gerekiyor acaba diye aklıma takıldı. Ama nasıl yapılır hiç bir fikrim yok ))

Alıntı:[b]SimaWB[/b] 

Olabilir üstadım. Evet o örnekte şuan çalışmıyor. Başka canlı yayın yapan siteleri açmayı denedim. işin ilginç yanı , bir tane sitede  hadi videoyu jwplayer yüzünden açamadı, sayfadaki diğer menüleri bile görüntüleyemedi.  Bende anlamadım gitti . Rtmp video player gibi bişey bulup onunla videoyu açmaya çalışacağım.

[SimaWB]

Ben de şimdi şöyle bir şey fark ettim:

Hata mesajından önceki ekran görüntüsü


Burada görüldüğü üzere webbrowser içinde Flash Plug'in açılmış, kontrolleri görülüyor. Belirli bir süre sonra sizin daha önce yazdığınız hata mesajı yazıyor. O zaman; sorunun JWPlayer yada sunucu yazılımından olduğu kesinleşti.

[QuAdR]

       if (is.safari() || is.android() || is.firefox()  ) {
           config.socketDelay = 35000;

           var player = new Clappr.Player({
               source: "https://hls.tombalalive.com/tombalaFlash/smil:live.smil/playlist.m3u8",
               parentId: "#player",
               autoPlay: true,
               width: '100%'
           });


       } else {
           var videoPlayer = jwplayer("player");

           videoPlayer.setup({
               file: "http://138.201.122.132:1935/tombalaFlash/smil:live.smil/jwplayer.smil"
           });

İki ayrı stream var.Safari, android ve firefox için m3u diğer browserlar için jw player seçilmiş.
Sadece videoyu izlemek istiyorsan direk olarak izleyebilirsin.Vlc activex kullanarak oynattım.
Resimdeki gibi:
https://pasteboard.co/GNvP7FJ.png

Webbrowserda istiyorsan clapper ı içeren bir html hazırlayıp lokal olarak delphi ile webbrowser a yükletip oynatabilirsin.
Resimdeki gibi:
https://pasteboard.co/GNvVZEB.png

[SimaWB]

Amaç RTMP protokolü ile stream edilen videoları göstermek/kaydetmek ise librtmp kullanılabilir. 
Pascal için örnek linkteki dosya içinde:
https://yadi.sk/d/DfYS0hzv3NVaWm

[Lord_Ares]

Alıntı:İki ayrı stream var.Safari, android ve firefox için m3u diğer browserlar için java player seçilmiş.
Sadece videoyu izlemek istiyorsan direk olarak izleyebilirsin.Vlc activex kullanarak oynattım.
Resimdeki gibi:
https://pasteboard.co/GNvP7FJ.png

Webbrowserda istiyorsan clapper ı içeren bir html hazırlayıp lokal olarak delphi ile webbrowser a yükletip oynatabilirsin.
Resimdeki gibi:
https://pasteboard.co/GNvVZEB.png

QuAdR sayende sorun şimdi anlaşıldı . Kodlamaya bakarsak Twebbrowsera uygun değil. Amacım sayfadaki videoyu forma ekleyip htm parse yöntemi ile sayfadan bilgi almaktı. Webbrowser ilgili siteyi açamadığı için sanırım tek şansım vlc ile forma ekleyip idhttp ile sayfayı parse etmek.
Okuduğum  kadarıyla , RTMP yayınlarını local html dosyası ile çalıştıramazsınız diyorlardı. Gördüğüm kadarıyla siz çalıştırmışsınız.  Standar html tagları arasında script kodu eklemek yeterli oldu sanırım. Nasıl yaptınız.
Hemen deniyorum inşallah olur ) çoook teşekkür ediyorum

[Lord_Ares]

Local html olarak explorer veya choreme ile açtığımda malesef çalışmadı. Twebbrowser ile clappr.io/demo/ sitesini açıp görüntüleyebilirmiyim diye baktım malesef sayfayı düzgün yükleyemiyor. Sanırım tek şans vlc birde öyle deniyeyim bakalım

[Lord_Ares]

(05-10-2017, Saat: 14:30)QuAdR Adlı Kullanıcıdan Alıntı: İki ayrı stream var.Safari, android ve firefox için m3u diğer browserlar için java player seçilmiş.
Sadece videoyu izlemek istiyorsan direk olarak izleyebilirsin.Vlc activex kullanarak oynattım.
Resimdeki gibi:
https://pasteboard.co/GNvP7FJ.png

Webbrowserda istiyorsan clapper ı içeren bir html hazırlayıp lokal olarak delphi ile webbrowser a yükletip oynatabilirsin.
Resimdeki gibi:
https://pasteboard.co/GNvVZEB.png

QuAdR malesef ben yapamadım. Bunda da şöyle bir sorun çıktı,  eğer arka planda google chrome veye explorer ile siteyi açmazsam vlc playerda göstermiyor. Nasıl yaptığın paylaşırmısın. Ben mi hata yapıyorum ?

uses PasLibVlcPlayerUnit, PasLibVlcClassUnit, PasLibVlcUnit;

Var
 xVLCPlayer    : PasLibVlcPlayerUnit.TPasLibVlcPlayer;
 xVLCMediaList : PasLibVlcPlayerUnit.TPasLibVlcMediaList;

procedure TForm1.BitBtn2Click(Sender: TObject);
Var
 strLogo1, strLogo2 : String;
begin
 if xVLCPlayer    = nil
   then xVLCPlayer := TPasLibVlcPlayer.Create(nil);

 if xVLCMediaList = nil
   then xVLCMediaList := TPasLibVlcMediaList.Create(nil);

 with xVLCPlayer do
 begin
   Parent       := Panel1;
   Align        := alClient;
   AudioOutput  := PasLibVlcClassUnit.aoWaveOut;
   if xVLCMediaList.IsPlay then
   begin
     xVLCMediaList.Stop;
     xVLCMediaList.Clear;
   end;
   xVLCMediaList.Player := xVLCPlayer;
   Application.ProcessMessages;
   xVLCMediaList.Add('https://hls.tombalalive.com/tombalaFlash/smil:live.smil/playlist.m3u8');
   xVLCMediaList.PlayItem( xVLCMediaList.GetItemAtIndex(0) );
 end;

// Logo Yükleme
 strLogo1 := ExtractFilePath(Application.ExeName) + 'Logo\logo1.png';
 strLogo2 := ExtractFilePath(Application.ExeName) + 'Logo\logo2.png';
 if (FileExists( strLogo1 ) and FileExists( strLogo1  )) then
 begin
   xVLCPlayer.LogoShowFiles( [strLogo1, strLogo2] );
   xVLCPlayer.LogoSetPosition( libvlc_position_top_right );
 end;

 xVLCPlayer.SetAudioVolume( 50 );

 if TrackBar1 <> nil then
 begin
   TrackBar1.Min      := 0;
   TrackBar1.Max      := 100;
   TrackBar1.Position := 50;
 end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
libvlc_dynamic_dll_init_with_path(ExtractFilePath(ParamStr(0)));
libvlc_dynamic_dll_init();
if (libvlc_dynamic_dll_error <> '') then
begin
  MessageDlg(libvlc_dynamic_dll_error, mtError, [mbOK], 0);
  exit;
end;
end;

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
 xVLCPlayer.SetAudioVolume( TTrackBar(Sender).Max - TTrackBar(Sender).Position );
end;
end.

[QuAdR]

VLC örneğini linkten indirebilirsin.
VlcPlay.zip - 398 KB

[Lord_Ares]

Senin örneğin çalıştı fakat çok geç bağlanıyor Açılışta 20 saniye bekliyor. Sebebi ne olabilir.

[SimaWB]

(06-10-2017, Saat: 15:50)Lord_Ares Adlı Kullanıcıdan Alıntı: Senin örneğin çalıştı fakat çok geç bağlanıyor Açılışta 20 saniye bekliyor. Sebebi ne olabilir.

Internet Explorer cache'te tuttuğu içindir.