5,388
社区成员
发帖
与我相关
我的任务
分享
var
hexbuf:array[1..2048] of byte;
i:integer;
recedata:Pchar;
begin
move(buffer^,pchar(@hexbuf)^,bufferlength);
//@hexbuf 中存储的十进制ascii码 @hexbuf(36,84,50,48,49,49,48,54,50,50,49,48,52,52,176,67,48,49,164,48,176.......) recedata:=@hexbuf;
//就是在这一步时,recedata中出现乱码( recedata=$T201106221048疌01??4595??癈02??3743??癈03??3729??癈04??3887??癈05??3396??癈 )...
var
hexbuf:array[1..2048] of byte;
i:integer;
recedata:Pchar;
begin
move(buffer^,pchar(@hexbuf)^,bufferlength);
//@hexbuf 中存储的十进制ascii码 @hexbuf(36,84,50,48,49,49,48,54,50,50,49,48,52,52,176,67,48,49,164,48,176.......)
recedata:=@hexbuf;
//就是在这一步时,recedata中出现乱码( recedata=$T201106221048疌01??4595??癈02??3743??癈03??3729??癈04??3887??癈05??3396??癈 ...)