delphi - 如何检查我的应用程序从磁盘写入和读取了多少字节？

Question

我不知道我是否使用了正确的词在网络上搜索，但我没有找到解决方案来查看我的应用程序已经在磁盘上读取和写入了多少内容。

有人可以帮我解决这个问题吗？

谢谢

[已解决]

如果有人需要功能符号。

type
  _IO_COUNTERS = record
    ReadOperationCount : LONGLONG;
    WriteOperationCount : LONGLONG;
    OtherOperationCount : LONGLONG;
    ReadTransferCount : LONGLONG;
    WriteTransferCount : LONGLONG;
    OtherTransferCount : LONGLONG;
  end;
  TIoCounters = _IO_COUNTERS;

  function GetProcessIoCounters(hProcess: THandle; var lpIoCounters: TIoCounters): BOOL; stdcall external kernel32;

Answer 1

如果您想以编程方式获取此信息，您可以使用 GetProcessIoCounters功能。另一种替代方法是使用 WMI ，请参阅 Win32_Process类(class) 并检查这些属性(WriteOperationCount、WriteTransferCount、ReadTransferCount、ReadOperationCount)。