![]() |
|
|
Регистрация | << Правила форума >> | 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)? |
#2
|
||||
|
||||
![]() Для начала помучай Google.
Je venus de nulle part 55.026263 с.ш., 73.397636 в.д. |
#3
|
||||
|
||||
![]() Так в чем трудность?
Как перевести байты в мегабайты? => 1МБ = 1048576 байт. |
#4
|
||||
|
||||
![]() Ему не это нужно, а:
Цитата:
Je venus de nulle part 55.026263 с.ш., 73.397636 в.д. |
#5
|
|||
|
|||
![]() Цитата:
|
#6
|
||||
|
||||
![]() Цитата:
PHP код:
|