显然每一次侵犯都是由弗里曼抛出的

在以下方法中,freemm()引发eacessViolation。可能的原因是什么?

procedure TCustomDataset.FreeRecordBuffer(var Buffer: PChar);
begin
  FreeMem(Buffer);
end;

编辑: 据我所知,TDataset缓冲区只分配在:

function TCustomDataset.AllocRecordBuffer: PChar;
begin
    Result := AllocMem(GetBufferSize);
end;

并且只在FreeRecordBuffer()中释放

现在我已经检查过了,在我的示例中,分配了2个缓冲区,第一个缓冲区会在没有挂接的情况下释放,但第二个缓冲区会导致freemm()抛出eacessviolation。我还检查了(通过写下指针地址)allocrecordbuffer()给出的两个地址是否都传递给freecrecordbuffer(),其他什么都没有。

根据 Delphi Basics freemm()只应在指针无效时引发einvalidpointer。

编辑:发现问题了,我重写了记忆。