Recherche avancée

Sur d’autres sites (7600)

• config : allowMultiple, let 2+ sounds play simultaneously (default : false, only one sound at a time)

  31 décembre 2010, par Scott Schiller

  m demo/360-player/demo-slider-controls.js m demo/360-player/index.html m demo/360-player/script/360player.js config : allowMultiple, let 2+ sounds play simultaneously (default : false, only one sound at a time)

• Play video files in a row without delay

  13 février 2015, par Ara Deonas

  I am looking for a way to play 2 video in a row without any delay (or
  very tiny delay) when changing files.
  I had 1 mp4 file and with ffmpeg I split it into 2 file and now I want
  to add them in playlist and play them but I don’t want user feel
  changing video but when I test it because of loading file there is a
  delay.
  I think about stream second file into memory before first file end.
  How can I do this ?
  I tested LibVLC and read Play a Video from MemoryStream, Using FFMpeg but still no luck.
  PS : Any library in any language is good for me.

  EDIT : I added a demo that play second file after first one but there is a delay beetwen changing.How can I minimize this ?(for example feeding VLC from memory and load second file into memory).
  EDIT : Files are small (less than 5mb).

  unit Unit1;
  
  
  
  {$mode objfpc}{$H+}
  
  
  
  interface
  
  
  
  uses
  
    Classes, SysUtils, FileUtil, PasLibVlcPlayerUnit, Forms, Controls, Graphics,LCLIntf,LCLType,
  
    Dialogs, ExtCtrls, StdCtrls, PasLibVlcPlayer, PasLibVlcUnit, PasLibVlcClassUnit;
  
  
  
  type
  
  
  
    { TForm1 }
  
  
  
    TForm1 = class(TForm)
  
      Button2: TButton;
  
      Panel2: TPanel;
  
      procedure Button1Click(Sender: TObject);
  
      procedure Button2Click(Sender: TObject);
  
      procedure FormCreate(Sender: TObject);
  
    private
  
      function GetVlcInstance(): TPasLibVlc;
  
      procedure WmMediaPlayerEndReached(var m: TVlcMessage); message WM_MEDIA_PLAYER_END_REACHED;
  
    public
  
      FVLC: TPasLibVlc;
  
      media_t_ptr:libvlc_media_t_ptr;
  
      media_t_ptr2:libvlc_media_t_ptr;
  
      FVideoOutput: TVideoOutput;
  
      FAudioOutput: TAudioOutput;
  
      p_mi: libvlc_media_player_t_ptr;
  
      p_instance: libvlc_instance_t_ptr;
  
      p_mi_ev_mgr: libvlc_event_manager_t_ptr;
  
      property VLC: TPasLibVlc read GetVlcInstance;
  
  
  
    end;
  
  
  
  var
  
    Form1: TForm1;
  
  
  
  procedure lib_vlc_player_event_hdlr(p_event: libvlc_event_t_ptr; Data: Pointer); cdecl;
  
  
  
  implementation
  
  
  
  procedure lib_vlc_player_event_hdlr(p_event: libvlc_event_t_ptr; Data: Pointer); cdecl;
  
  var
  
    Form: TForm1;
  
  begin
  
    if (Data = nil) then
  
      exit;
  
    Form := TForm1(Data);
  
    if not Assigned(Form) then
  
      exit;
  
    case p_event^.event_type of
  
      libvlc_MediaPlayerEndReached:
  
        PostMessage(Form.Handle, WM_MEDIA_PLAYER_END_REACHED, WPARAM(0), LPARAM(0));
  
    end;
  
  end;
  
  
  
  {$R *.lfm}
  
  
  
  { TForm1 }
  
  
  
  procedure TForm1.Button1Click(Sender: TObject);
  
  begin
  
  
  
  end;
  
  
  
  procedure TForm1.Button2Click(Sender: TObject);
  
  var
  
    mrl: string;
  
  begin
  
    mrl := 'C:\ffmpeg\bin\tmp\OUTPUT0.mp4';
  
  
  
   media_t_ptr:=libvlc_media_new_path(VLC.Handle, PAnsiChar(UTF8Encode(mrl)));
  
    p_instance := VLC.Handle;
  
    p_mi := libvlc_media_player_new(p_instance);
  
    p_mi_ev_mgr := libvlc_media_player_event_manager(p_mi);
  
    libvlc_event_attach(p_mi_ev_mgr, libvlc_MediaPlayerEndReached, @lib_vlc_player_event_hdlr, SELF);
  
    libvlc_media_player_set_media(p_mi, media_t_ptr);
  
    libvlc_media_release(media_t_ptr);
  
    libvlc_media_player_set_display_window(p_mi, Panel2.Handle);
  
    libvlc_media_player_play(p_mi);
  
  
  
     mrl := 'C:\ffmpeg\bin\tmp\OUTPUT1.mp4';
  
  
  
    media_t_ptr2:=libvlc_media_new_path(VLC.Handle, PAnsiChar(UTF8Encode(mrl)));
  
  end;
  
  
  
  procedure TForm1.FormCreate(Sender: TObject);
  
  begin
  
    Button2.Click;
  
  end;
  
  
  
  function TForm1.GetVlcInstance: TPasLibVlc;
  
  begin
  
    if not Assigned(FVLC) then
  
    begin
  
      FVLC := TPasLibVlc.Create;
  
    end;
  
    Result := FVLC;
  
  end;
  
  
  
  procedure TForm1.WmMediaPlayerEndReached(var m: TVlcMessage);
  
  begin
  
    libvlc_media_player_set_media(p_mi, media_t_ptr2);
  
    libvlc_media_player_play(p_mi);
  
  end;
  
  
  
  end.

• Why does Google Chrome not play one of my mp4 files with H.264 codec, while Firefox does ?

  23 mai 2023, par Paul Levy

  I have two mp4, both with H.264 codecs. One plays in Chrome (I didn't create it) and the other downloads and plays in my computer's video player rather than in-browser. Both play completely fine in Firefox. I've searched and cannot understand how to make it work in Chrome (Version 113.0.5672.126 on Mac). I'm writing the videos with ffmpeg version 4.3.6-0.

  


  Here are the selected ffprobe outputs for the two videos (the first doesn't play in Chrome, the second does) :

  


  


  Video : h264 (Main) (avc1 / 0x31637661), yuv420p(progressive), 2880x960, 1684 kb/s, 100 fps, 100 tbr, 12800 tbn (default)

  


  


  


  Video : h264 (Main) (avc1 / 0x31637661), yuv420p(tv, bt709, progressive), 240x426 [SAR 1:1 DAR 40:71], 20 kb/s, 29.97 fps, 29.97 tbr, 30k tbn (default)

  


  


  I'm creating the first video with the following flags (merging the audio has no impact) :

  


  ffmpeg -i VIDEO -i AUDIO -c:v copy -af aresample=async=1:first_pts=0 -loglevel error -vcodec libx264 -profile:v main -preset medium -movflags +faststart -pix_fmt yuv420p -y OUTPUT


  


  where I create VIDEO by merging 3 videos horizontally with :

  


  ffmpeg -i VIDEO_1 -i VIDEO_2 -i VIDEO_3 -filter_complex hstack=inputs=3 -loglevel error -vcodec libx264 -profile:v main -preset medium -movflags +faststart -pix_fmt yuv420p -y VIDEO