[lkz_07]

Уже 3 дня в поисках, как считать температуру с видеокарты NVIDIA и RADEON... Ничего не могу найти....

Нашел только вот это: https://delphigl.com/forum/viewtopic.php?p=96705 для NVIDIA, однако показывает 0.

Может у кого завалялся примерчик?

[Alegun]

Поднималась эта тема здесь, там и примерчик вроде есть

[lkz_07]

Сообщение от Alegun

Поднималась эта тема здесь, там и примерчик вроде есть

Да, я видел эту тему, но там нет температуры с видеокарты...

[lmikle]

Вот тут есть пара ссылок.
http://stackoverflow.com/questions/2...rd-temperature
не проверял. Походу, можно пытаться загрузить нужную dll, если загрузилась - то читаем, если нет, то переходим к следующей.

[lkz_07]

Сообщение от lmikle

Вот тут есть пара ссылок.
http://stackoverflow.com/questions/2...rd-temperature
не проверял. Походу, можно пытаться загрузить нужную dll, если загрузилась - то читаем, если нет, то переходим к следующей.

Тут я тоже был. В первом посте есть исходник для NVIDIA, но температуру показывает 0.

[Alegun]

Сообщение от lkz_07

...В первом посте есть исходник для NVIDIA, но температуру показывает 0.

Там обёртка для NvCplGetThermalSettings из апишной библиотеки вендора nvcpl.dll, она похоже работала под ХР, и видимо считывала выходную информацию из ветки реестра NVIDIA ...-> MXMThermalControl, а под семёркой там ничего не меняется, отсюда и нулевой показатель. Можно ещё задействовать подобную функцию GetGpuTemperatureDll из nvsulib.dll с вызовом типа

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
type
  GetGpuTempDll = function(dwCoreTemp: Pointer): integer; stdcall;
var
 hDll: THandle;
 pdwCoreTemp: Pointer;
 GetGpuTemperatureDll: GetGpuTempDll;
begin
 hDll:= LoadLibrary('nvsulib.dll');
 if hDll <> 0 then
  try
   GetGpuTemperatureDll := GetProcAddress(hDll, 'GetGpuTemperatureDll');
   if Assigned(GetGpuTemperatureDll) then
    Label1.Tag:= GetGpuTemperatureDll(Addr(pdwCoreTemp));
   Label1.Caption:= IntToStr(integer(pdwCoreTemp));
 finally
   FreeLibrary(hDll);
 end;
end;

этот "термометр" работает - на k420 нагрев колеблется в пределах 45-47 градусов, gpu-z тоже самое показывает, проверил