Delphi 将视频 Base64 字符串转换为视频二进制文件

Posted 2021-02-05 rtcmw

tags:

篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了Delphi 将视频 Base64 字符串转换为视频二进制文件相关的知识，希望对你有一定的参考价值。

var
  VideoBytes: TBytes;
  VideoStream: TBytesStream;
begin
  with System.NetEncoding.TBase64Encoding.Create do
  try
    VideoBytes := Decode(System.IOUtils.TFile.ReadAllBytes(‘video.txt‘));
  finally
    Free;
  end;

  VideoStream := TBytesStream.Create(VideoBytes);
  try
    VideoStream.SaveToFile(‘video.mp4‘);
  finally
    FreeAndNil(VideoStream);
  end;

end;

以上是关于Delphi 将视频 Base64 字符串转换为视频二进制文件的主要内容，如果未能解决你的问题，请参考以下文章