Delphi XE6 String转MemoryStream

2022-10-10 09:03:26 作者:admin

本文整理自网络,侵删。

 将一个字符串转换成MemoryStream的函数.
function StringToMemory(s:string):TMemoryStream;
var
  bytes:TBytes;
  ms:TMemoryStream;
begin
      ms:=TMemoryStream.Create;
      bytes := TEnCoding.UTF8.GetBytes(s);
      ms.Write(bytes, Length(bytes));
      result:=ms;
end;

在线咨询 拨打电话