关于如何正确在Delphi中声明API所需的数据类型

Question

VAR
 RootPathBuf, VolNameBuf,FileSysNameBuf : PChar;
 NameBufSize, VolSerialNumber,
 MaxFileNameLength,FileSysFlags : dword;
Begin
  NameBufSize := 256;
  RootPathBuf := StrAlloc(NameBufSize);
  VolNameBuf := StrAlloc(NameBufSize);
  FileSysNameBuf := StrAlloc(NameBufSize);
  RootPathBuf := 'A:\';
  IF GetVolumeInformation(RootPathBuf,VolNameBuf,NameBufSize,
              @VolSerialNumber,MaxFileNameLength,
              FileSysFlags,FileSysNameBuf,NameBufSize then

Answer 1

谢谢各位的帮助，问题已经解决了。