Delphi -> 字节数组到 LongInt

Mic*_*zer 1 delphi move

我想从中取出 4 个字节

Source : Array[0..500] of Byte;
Run Code Online (Sandbox Code Playgroud)

在哪里

c : integer; // Start Point
Run Code Online (Sandbox Code Playgroud)

v : LongInt;
Run Code Online (Sandbox Code Playgroud)

Move(Source[c], v, 4);
Run Code Online (Sandbox Code Playgroud)

只给我 1 个字节。我的错在哪里?

再次感谢。

Gol*_*rol 5

这个来源工作得很好。但是,如果只有第一个字节(位于 index 处的字节c)包含除0.

Sertac Akyuz 已经建议的这种替代方法也可以正常工作:

v := PLongInt(@Source[c])^;
Run Code Online (Sandbox Code Playgroud)