Получнение информации о системе. Функция GetSystemInfo

[Д'якон]

Уважаемые прогрммисты! Помогите воспользоваться функцией

The GetSystemInfo function returns information about the current system.

VOID GetSystemInfo(

LPSYSTEM_INFO lpSystemInfo // address of system information structure
);


Parameters

lpSystemInfo

Points to a SYSTEM_INFO structure to be filled in by this function.

Написано - в параметре address of system information. Я задаю адресс переменной. Говорит несовпадение параметров. Как мне отобразить на экран результат действия этой функции.

Зарание спасибо

[mihali4]

Я задаю адресс переменной. Говорит несовпадение параметров.

Какой переменной???
Там же по русс..., т.е. по аглицки ясно сказано:
lpSystemInfo - Points to a SYSTEM_INFO structure to be filled in by this function
или по-русски:
lpSystemInfo - указывает на СТРУКТУРУ (а не переменную!!!) SYSTEM_INFO, заполняемую этой функцией.
Объявите структуру, используйте указатель на нее. И будет вам полное счастье...
Только не надо спрашивать - что такое структура и проч.
Читайте умную книжку, взятую с сайта форума, благо их там хватает...

[Д'якон]

Все разобрался и написал.
Теперь другой вопрос. Я его когда-то уже задавал на этом форуме, но так никто и не ответил (может конечно никто не знает). Повторюсь.

Как получить сведения о системе. А именно, например, имя процессора, которое также отображается во вкладке "Общие" в св-вах моего компьютера?
Заранее благодарен

[mihali4]

Сообщение от Д'якон

Как получить сведения о системе. А именно, например, имя процессора, которое также отображается во вкладке "Общие" в св-вах моего компьютера?
Заранее благодарен

Не понял...
Вы саму структуру смотрели?

typedef struct _SYSTEM_INFO { // sinf
union {
DWORD dwOemId;
struct {
WORD wProcessorArchitecture;
WORD wReserved;
};
};
DWORD dwPageSize;
LPVOID lpMinimumApplicationAddress;
LPVOID lpMaximumApplicationAddress;
DWORD dwActiveProcessorMask;
DWORD dwNumberOfProcessors;
DWORD dwProcessorType;
DWORD dwAllocationGranularity;
WORD wProcessorLevel;
WORD wProcessorRevision;
} SYSTEM_INFO;

Анализируя выделенные жирным значения, и составьте наименование в том виде, который вам хочется.
То, что хранится в реестре, примерно так и получено.

[Д'якон]

Т.е. я правильно понял? Что анализируя данные сведения я смогу получить текст вида:

Intel(R) Pentium(R) 4 CPU 2.00 Ghz (мне нужна эта надпись в точности до единого символа) (к стати она же и отображается в имени процессора а его св-вах)
Можно ее получить?
Просто ответте да, нет.

[JTG]

Эта строка хранится отут
HKEY_LOCAL_MACHINE\HARDWARE\DESCRIP TION\System\CentralProcessor\0\Proc essorNameString

[Д'якон]

Спасибо большое. Просто огромное. Вы помогли сотням, а может и тысячам людей. ЭТО ПРОСТО СУПЕР.

[mihali4]

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

Эта строка хранится отут
HKEY_LOCAL_MACHINE\HARDWARE\DESCRIP TION\System\CentralProcessor\0\Proc essorNameString

А вот у меня на ноуте такого параметра нетути...
И полного имени нет, есть только по отдельности три параметра:
~Mhz ...
Identifier x86 Family...
VendorIdentifier GenuineIntel

[Д'якон]

Раз вынесли это в отдельную тему позволю себе написать правильное использование функции, чтобы новички типа меня не допускали моих ошибок.

var
info:TSystemInfo;
begin
GetSystemInfo(info);
;для выводна на экран, например
label1.Caption:=FloatToStr(info.пар аметр(например,dwActiveProcessorMas k)

[JTG]

Если совсем нечего делать - всю эту бадягу с процом можно заменить на ассемблерную инструкцию CPUID, которая поддерживается большинством процессоров ("допентиумные четвёрки" не в счёт )

В часности ту-самую строку можно достать вот так (пардон за com-файл, так проще FASM)

org 100h

xor eax,eax
cpuid
mov dword[vendor],ebx
mov dword[vendor+4],edx
mov dword[vendor+8],ecx
mov ah,9
mov dx,vendor
int 21h

mov eax,80000002h
cpuid
mov dword[name],eax
mov dword[name+4],ebx
mov dword[name+8],ecx
mov dword[name+12],edx
mov eax,80000003h
cpuid
mov dword[name],eax
mov dword[name+4],ebx
mov dword[name+8],ecx
mov dword[name+12],edx
mov eax,80000004h
cpuid
mov dword[name+16],eax
mov dword[name+20],ebx
mov dword[name+24],ecx
mov dword[name+28],edx

mov ah,9
mov dx,name
int 21h

xor ah,ah
int 16h
int 20h

vendor db 12 dup (0),13,10,'$'
name db 48 dup (0),'$'

Подрбнее
http://en.wikipedia.org/wiki/CPUID
http://ru.wikipedia.org/wiki/CPUID
http://wasm.ru/article.php?article=hardzen