delphi 从索引复制内存

Question

我正在使用Delphi 7。你能告诉我是否有或可以在某处找到一个程序其行为类似于: CopyMemory 但我可以从中复制内存具体字节数。

我需要带有以下签名的东西:

procedure CopyMemory(Destination: Pointer; Source: Pointer; Length: DWORD; fromByte: Integer);

我需要这个，因为我必须通过 tcpip 发送未发送的字节，这就是我必须提取存储在内存中的未发送字节的原因。

我查看了源代码，我需要重写一些汇编部分。我已经很多年没有接触过 asm 了，我宁愿选择可靠的东西..

谢谢!

Answer 1

你可以使用这个:

procedure CopyMemory(Destination: Pointer; Source: Pointer; Length, fromByte: Integer);
begin
  move(PAnsiChar(Source)[frombyte],PAnsichar(Dest)[frombyte],Length-fromByte);
end;

并且不要重写移动部分。依赖VCL版本。或使用 FastCode version如果你需要的话。