TsgcHTTPServer | ビデオのストリーミング

サーバーを使用してビデオファイルをストリーミングする場合、IndyStreamFileVideo 関数を使用してチャンク転送エンコーディングでファイルをストリーミングできます。

この関数は以下のパラメータを受け取ります。

• AContext: OnCommandGet イベントから取得します。
• AResponseInfo： OnCommandGet イベントから取得されます。
• aFileName: ストリーミングするビデオの完全なファイル名です。
• ContentType: デフォルトは「video/mpeg」です。
• aBufferSize: デフォルトは 1024 バイトです。

使用例: ユーザーがドキュメント /video.mp4 にアクセスしたとき、このビデオが c:\videos\video.mp4 フォルダーにある場合にビデオをストリーミングします

procedure OnServerCommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
begin
  if ARequestInfo.Document = '/video.mp4' then
    IndyStreamFileVideo(Acontext, AResponseInfo, 'C:\videos\video.mp4')
  else
    AResponseInfo.ResponseNo := 404;
end;