Как можно вывести на экран

← →
baks_uz (2005-11-17 07:16) [0]

Как можно вывести на экран какой проц., RAM, HDD, монитор и т.д. установлено на компьютере?
Заранее благодарен!

← →
Crazy_Diman © (2005-11-17 08:50) [1]

какой проц
var sys: TSystemInfo; begin GetSystemInfo(sys); case sys.dwProcessorType of 386 : Label1.Caption := " 386"; 486 : Label1.Caption := " 486"; 586 : Label1.Caption := " Pentium"; end; end;

← →
Crazy_Diman © (2005-11-17 09:16) [2]

//memory.dwMemoryLoad: Количество используемой памяти в процентах.
//memory.dwTotalPhys: Общее количество физической памяти.
//memory.dwAvailPhys: Количество оставшейся физической памяти .
var
memory: TMemoryStatus;
begin

GlobalMemoryStatus(memory);
Label1.Caption := IntToStr(memory.dwTotalPhys );

end;

← →
baks_uz (2005-11-17 16:33) [3]

Я имел ввиду сообщение типа "ПРОЦЕССОР - Pentium 4 with HTT - 2411 Mhz, 1,5V, Socket 478" или "Монитор - SAMSUNG SyncMaster 753s"
можно-ли получить информацию о компьютере в таком формате как в "dxdiag"

Как можно вывести на экран Найти похожие ветки