5,386
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
王集鹄 2002-08-14
- 打赏
- 举报
//没有地方调试 :(
//如果你的数组下标从0开始就比较简单
var
P: PChar;
C: array[0..9] of Char absolute P; //指向同一地址
begin
//直接使用C
end;
//参考CopyMemory()
var
P: PChar;
C: array[1..10] of Char;
begin
CopyMemory(Pointer(C), P, StrLen(P));
end;
//如果你的数组下标从0开始就比较简单
var
P: PChar;
C: array[0..9] of Char absolute P; //指向同一地址
begin
//直接使用C
end;
//参考CopyMemory()
var
P: PChar;
C: array[1..10] of Char;
begin
CopyMemory(Pointer(C), P, StrLen(P));
end;
