在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
DELPHI7适用的BytesOf和StringOf
function BytesOf(const Val: AnsiString): TBytes; var Len: Integer; begin Len := Length(Val); SetLength(Result, Len); Move(Val[1], Result[0], Len); end; function StringOf(const buf:TBytes): AnsiString; begin SetLength(Result, Length(buf)); CopyMemory(PAnsiChar(result), @buf[0], Length(buf)); end;
|
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
请发表评论