| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как можно вывести на экран [D6, Win2k]

baks_uz ©   (2005-11-17 07:16:00) 

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

---

baks_uz   (2005-11-17 16:33:00) [1]

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

---

Crazy_Diman   (2005-11-17 09:16:00) [2]

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

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

end;

---

Crazy_Diman   (2005-11-17 08:50:00) [3]

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

---

Наверх