TsgcHTTPServer | Video streamen

Wenn Sie eine Videodatei über den Server streamen möchten, können Sie die Funktion IndyStreamFileVideo verwenden, um die Datei mit Chunked Transfer Encoding zu streamen.

Die Funktion nimmt die folgenden Parameter entgegen:

• AContext: wird aus dem Ereignis OnCommandGet entnommen.
• AResponseInfo: es wird aus dem OnCommandGet-Ereignis übernommen.
• aFileName: ist der vollständige Dateiname des zu streamenden Videos.
• ContentType: standardmäßig "video/mpeg".
• aBufferSize: standardmäßig 1024 Bytes.

Beispiel: Streamen Sie ein Video, wenn ein Benutzer das Dokument /video.mp4 aufruft, und dieses Video befindet sich im Ordner 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;