如何获取硬盘的转速？？？（在线）

Question

如何获取硬盘的转速？？？（在线）

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
  var
  reg : TRegistry;
  Data : integer;begin
  Reg:=TRegistry.Create;
  Reg.RootKey:=HKEY_DYN_DATA;    
  Reg.OpenKey('PerfStats\StatData',false);
  Reg.ReadBinaryData('VFAT\ReadsSec',Data,SizeOf(integer));
  Label1.Caption:=IntToStr(Data)+' bytes read per second';
  Reg.ReadBinaryData('VFAT\WriteSec',Data,SizeOf(integer));
  Label2.Caption:=IntToStr(Data)+' bytes written per second';
  Reg.CloseKey;  Reg.Free;
end;这好像是98下的,我的是2000，根本找不到HKEY_DYN_DATA这个建值，
你试试吧