TsgcHTTPServer | Strumieniowanie wideo

Jeśli chcesz strumieniować plik wideo za pomocą serwera, możesz użyć funkcji IndyStreamFileVideo do strumieniowania pliku przy użyciu kodowania przesyłania fragmentarycznego.

Funkcja przyjmuje następujące parametry:

• AContext: pochodzi ze zdarzenia OnCommandGet.
• AResponseInfo: pochodzi ze zdarzenia OnCommandGet.
• aFileName: pełna nazwa pliku wideo do strumieniowania.
• ContentType: domyślnie „video/mpeg".
• aBufferSize: domyślnie wynosi 1024 bajty.

Przykład: strumieniowanie wideo, gdy użytkownik przejdzie do dokumentu /video.mp4, a film ten znajduje się w folderze 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;