摘要: 大小端交换 {$IF RTLVersion<25} IntPtr = Integer; {$IFEND IntPtr} function swap16(const v): Word; begin // FF, EE : EE->1, FF->2 PByte(@result)^ := PByte(In 阅读全文
posted @ 2020-09-25 08:09 delphi中间件 阅读(315) 评论(0) 推荐(0) 编辑