指针参数问题

Question

声明   procedure MyFunction ( var Buffer )某过程
  var Buffer: array[0..39] of Char;
begin
  MyFunction (Buffer[0]);       //调用正确
  MyFunction (Buffer); //调用错误!!需要的是不可理解的是：
function FileRead(Handle: Integer; var Buffer; Count: Integer): Integer;
显然也是Buffer，但是在例子中却是一个Buffer类型的变量：var
  BufferA: PChar;
  BufferB: array[0..2047] of Char;
begin
  try
      Buffer := PChar(AllocMem(iFileLength + 1));
      iBytesRead := FileRead(iFileHandle, BufferA, iFileLength);     //为什么是正确的?
      iBytesRead := FileRead(iFileHandle, BufferB[0], iFileLength);  //为什么是正确的?
      iBytesRead := FileRead(iFileHandle, BufferB, iFileLength);     //为什么是错误的???
  finally
      FreeMem(Buffer);
  end

Answer 1

我遇过此类问题
我的理解是,当 var Buffer 参数时,用Buffer[0]会转成buffer的首地址,而直接写Buffer会把buffer本身的地址传过去
我记得正确的写法是MyFunction ((@Buffer)^);
另外:delphi的help中 FileRead的ex是错的.

Answer 2

参数是指针类型，delphi不同于C,数组不会当作指针类型处理。