function GetDisplayFrequency: Integer; var DeviceMode: TDeviceMode; begin EnumDisplaySettings(nil, Cardinal(-1), DeviceMode); Result := DeviceMode.dmDisplayFrequency; end;