This is how the code looks like in the included code for this utility.

// Get the processor speed info.

result = ::RegOpenKeyEx (HKEY_LOCAL_MACHINE,
	"Hardware\\Description\\System\\CentralProcessor\\0", 0, KEY_QUERY_VALUE, &hKey);

// Check if the function has succeeded.

if (result == ERROR_SUCCESS) {
	result = ::RegQueryValueEx (hKey, _T("~MHz"), NULL, NULL,
		(LPBYTE)&data, &dataSize);

	m_stCPUSpeed.Format ("%d", data);
	m_stCPUSpeed += _T (" MHz");

	dataSize = sizeof (vendorData);

	result = ::RegQueryValueEx (hKey, _T("VendorIdentifier"), NULL, NULL,
		(LPBYTE)vendorData, &dataSize);

	m_stVendorInfo.Format ("%s", vendorData);
}

// Make sure to close the reg key

RegCloseKey (hKey);

Physical Memory Status:

VOID GlobalMemoryStatus (
LPMEMORYSTATUS lpBuffer // pointer to the memory status structure
);

typedef struct _MEMORYSTATUS { // mst
 DWORD dwLength; // sizeof(MEMORYSTATUS)
 DWORD dwMemoryLoad; // percent of memory in use
 DWORD dwTotalPhys; // bytes of physical memory
 DWORD dwAvailPhys; // free physical memory bytes
 DWORD dwTotalPageFile; // bytes of paging file
 DWORD dwAvailPageFile; // free bytes of paging file
 DWORD dwTotalVirtual; // user bytes of address space
 DWORD dwAvailVirtual; // free user bytes
} MEMORYSTATUS, *LPMEMORYSTATUS;