Question

delphi为一个Pointer变量赋值

有一个变量x:pointer
我想将一个byte数组地址赋值给X，如何操作？

Answer 1

从你数组下标的第一个开始可以看作他的指针
比如静态数组arr:array[0..30] of byte;
那么就可以 x:=Pointer(@Arr[0]);
静态数组还可以 Arr:Array[1..30] of byte;
同样的 X:=Pointer(@Arr[1]);
动态数组都是从0下标开始的
Arr:Array of byte;
就参照x:=Pointer(@Arr[0])就行了

追问

我照你的代码 x:=pointer(@arr[0]) 结果X指向地址的数据未变

arrr:array[0..15] of BYTE = ($1,$2,$3,$4,$5,$6,$7,$8,$9,$A,$B,$C,$D,$E,$F,$10);

是不是需要进行一些内存拷贝的操作才行？

追答

不需要拷贝什么内存，Pointer(@Arr[0])得到的就是一个地址，看你怎么用这个地址

Answer 2

byte 数组是多大的啊。 告诉我大小和 值 我测试一下给你贴代码。

追答

var
by:array [0..4] of byte;
x:pointer;
begin
by[0]:=20;
x:=@by;
end;

追问

x:=@by;这一句出错

这样的结果在 x指向的地址数据为全00

我的数组有30个字节。

追答