TsgcHTTPServer | Video streamen

Als u een videobestand wilt streamen via de server, kunt u de functie IndyStreamFileVideo gebruiken om het bestand te streamen met behulp van chunked transfer encoding.

De functie accepteert de volgende parameters:

• AContext: afkomstig uit de OnCommandGet-gebeurtenis.
• AResponseInfo: afkomstig van de OnCommandGet-gebeurtenis.
• aFileName: de volledige bestandsnaam van de te streamen video.
• ContentType: standaard is "video/mpeg".
• aBufferSize: standaard is 1024 bytes.

Voorbeeld: stream een video wanneer een gebruiker naar het document /video.mp4 gaat en deze video staat in de map 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;