Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.14;
Скачать: [xml.tar.bz2];




Вниз

Вопрос 


Alexander Beliy   (2001-12-08 02:03) [0]

Где можно узнать про TMemoryStatus, TOSVersionInfo и им подобные? Что еще из этой серии есть?



Rem   (2001-12-08 16:58) [1]

GlobalMemoryStatus - интерактивная справка по Ctrl+F1



Anatoly Podgoretsky   (2001-12-08 19:50) [2]

Наверно у авторов этих компонент.
Из этой серии может быть великое множество, сделай поиск по специализированным архивам.



Rem   (2001-12-09 13:34) [3]

TMemoryStatus, TOSVersionInfo - не компоненты. Это структуры (записи), в которых Windows возвращает системную информацию.
TMemoryStatus заполняется функцией GlobalMemoryStatus() и показывает загрузку памяти (%), объем физической памяти (всего и доступно), страничной памяти (всего и доступно), виртуальной памяти (всего и доступно):

TMemoryStatus = record
dwLength: DWORD;
dwMemoryLoad: DWORD;
dwTotalPhys: DWORD;
dwAvailPhys: DWORD;
dwTotalPageFile: DWORD;
dwAvailPageFile: DWORD;
dwTotalVirtual: DWORD;
dwAvailVirtual: DWORD;
end;


Для получения информации о текущем состоянии памяти:

var
MemoryStatus: TMemoryStatus;
begin
GlobalMemoryStatus(MemoryStatus);
...
end;


TOSVersionInfo заполняется функцией GetVersionEx(), и содержит версию Windows (старшую и младшую), номер сборки, идентификатор платформы, и строку с информацией об установленном ServicePack (NT) или с дополнительной информацией о системе (9x):

TOSVersionInfo = record
dwOSVersionInfoSize: DWORD;
dwMajorVersion: DWORD;
dwMinorVersion: DWORD;
dwBuildNumber: DWORD;
dwPlatformId: DWORD;
szCSDVersion: array[0..127] of AnsiChar;
end;


Для получения информации об операционной системе:

var
OSVersionInfo: TOSVersionInfo;
begin
if GetVersionEx(OSVersionInfo) then
begin
...
end
else
// Exception
end;



Rem   (2001-12-09 13:40) [4]

Прошу прощения, поспешил. Перед вызовом этих функций необходимо обязательно указать размер записей:

MemoryStatus.dwLength := SizeOf(MemoryStatus);

и

OsVersionInfo.dwOSVersionInfoSize := SizeOf(OSVersionInfo);



Anatoly Podgoretsky   (2001-12-09 15:56) [5]

Теперь понятно про что речь.
Тогда проще всего открыть файл windows.pae и дополнительно win32.hlp



Alexander Beliy   (2001-12-10 14:21) [6]

Спасибо всем !!!!!!




Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.025 c
7-43199           Mr.Death              2001-12-01 14:15  2002.03.14  
Как под Win2000/XP узнать handle дочернего окна Windows Task Manager?


4-43220           TED                   2002-01-16 06:43  2002.03.14  
WM_QUERYENDSESSION и WM_ENDSESSION


3-42944           _Oleg_                2002-02-15 08:33  2002.03.14  
Картинки в БД ...


3-42975           foks                  2002-02-16 14:42  2002.03.14  
Как подключить одну базу данных другой


3-42964           zver                  2002-02-15 14:18  2002.03.14  
Нужно перевести время в виде строки