Recuperer la taille de la RAM avec Delphi 7

Salut et bonne année,
Voila je veux recuperer la taile de la RAM de mon PC avec Delphi 7.
ya til une API pour cela?
Merci

Salut

Code:

---

1 2 3 4 5 6 7 8 9

function TailleRAM: Cardinal; var X: MEMORYSTATUS; begin X.dwLength := SizeOf(X); GlobalMemoryStatus(X); result := X.dwTotalPhys; end;

---

Taille exprimée en octets.

@+ Claudius

merci