A példa használatához két feltétel szükséges: az egyik, hogy az adott gépben ASUS alaplap legyen, a másik, hogy az alaplaphoz mellékelt CD lemezen található PC Probe nevű alkalmazás fel legyen telepítve a számítógépre. E programmal együtt kerül a gépre az Asus.dll állomány is, melynek függvényeit meg fogjuk hívni saját alkalmazásunkból és ily módon megtudhatjuk a szükséges hőmérséklet adatokat.
A PC Probe nevű alkalmazás alapértelmezésben a C:\Program Files\ASUS\Probe mappába kerül. Amikor programunk fut, akkor az e mappában lévő DLL-eket el kell hogy érje. Ez alapértelmezett esetben nem sikerül. Ennek megoldására meg kell adnunk az elérési útvonalak között e mappát is. Ehhez kattintsunk jobb gombbal az Asztalon lévő Sajátgépen, majd a Tulajdonságok menüpont választásával megjelenő ablakon a Speciális lapon lévő Környezeti változók nevű gombra kattintsunk.
Az ekkor megjelenő ablak alsó részén lévő listából keressük elő a Path nevű elemet, majd kattintsunk a Szerkesztés gombra.
Ekkor újabb ablak jelenik meg. Itt a Változó értékénél adjuk meg a C:\Program Files\ASUS\Probe mappát is a többi után egy pontosvesszővel elválasztva.
Zárjuk be az ablakokat OK gombbal, majd indítsuk újra a gépet. Ezek után a szükséges DLL-ek már bármely program számára bárhonnan hozzáférhetők lesznek.
A példaprogram
A megvalósítás ezek után már egyszerű: az Asus.dll-ben lévő függvényeket deklaráljuk külsőként, annak érdekében, hogy elérhessük azokat. A GetCPUTemperature a processzor hőmérsékletét adja meg, míg a GetMBTemperature az alaplapét. A GetFanCPURPM függvényt használva a CPU ventillátor fordulatszámát kapjuk, míg a GetVoltINx függvényekkel a különböző feszültségek (1.5 V, 3.3 V, 5 V, 12 V, -12 V) aktuális értékeit.
function GetCPUTemperature(): integer; stdcall; external 'asus.dll';
function GetMBTemperature(): integer; stdcall; external 'asus.dll';
function GetFanCPURPM(): integer; stdcall; external 'asus.dll';
function GetVoltIN0(): integer; stdcall; external 'asus.dll';
A függvények felhasználása szintén egyszerű, mivel paramétert sem várnak. Visszatérési értékük pedig az adott hőmérsékleti érték Celsius fokban mérve.
procedure TForm1.FormCreate(Sender: TObject);
begin
ListBox1.Items.Add('GetCPUTemperature: '+IntToStr(GetCPUTemperature)+' C');
ListBox1.Items.Add('GetMBTemperature: '+IntToStr(GetMBTemperature)+' C');
ListBox1.Items.Add('FanCPURPM: '+IntToStr(GetFanCPURPM));
ListBox1.Items.Add('GetVoltIN0: '+FloatToStr(GetVoltIN0/1000)+' V');
end;