![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Стоит задача: сделать программку которая будет выводить информацию о железе компьютера. Криво-косо, но потихоньку делаю.
Ситуация: информация о используемой памяти выводится в байтах, нужно её выводить в мегабайтах, после довольно долгого тщетного поиска решил обратиться сюда. Код:
begin Information.Lines.Clear; MemoryStatus.dwLength:=SizeOf(MemoryStatus); GlobalMemoryStatus(MemoryStatus); with MemoryStatus do begin Information.Lines.Add(IntToStr(dwMemoryLoad)+'% использовано памяти'); Information.Lines.Add(IntToStr(dwTotalPhys)+' всего физической памяти'); Information.Lines.Add(IntToStr(dwAvailPhys)+' доступно физической памяти'); Information.Lines.Add(IntToStr(dwTotalPageFile)+' всего виртуальной памяти'); Information.Lines.Add(IntToStr(dwAvailPageFile)+' доступно виртуальной памяти'); Information.Lines.Add(IntToStr(dwTotalVirtual)+' Общее число байтов виртуальной памяти, используемой в вызывающем процессе'); Information.Lines.Add(IntToStr(dwAvailVirtual)+' Объем виртуальной памяти, доступной для вызывающего процесса'); end; В делфи, честно сказать, мало что понимаю, ибо занимаюсь им лишь пару дней, прошу ответы формулировать как можно более "человеческим" языком. P.S. Если кто знает подскажите, с помощью чего можно получить информацию о всех имеющихся в компьютере дисках (включая RAM)? |