Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > Что этот код делает?


Автор: Pakshin A. S. 20.7.2004, 11:53
Код

function MyGetFreeSystemResources32(id: integer):integer; stdcall, external 'rsrc32' name '_MyGetFreeSystemResources32@4';

begin
writeln('System: ', MyGetFreeSystemResources32(0), '%');
writeln('GDI: ', MyGetFreeSystemResources32(1), '%');
writeln('USER: ', MyGetFreeSystemResources32(2), '%');
readln
end.

Это про какие ресурсы? и вообще что эа функция такая?

Автор: Girder 20.7.2004, 13:23
Определяется загрузка ресурсов System, GDI и USER(короче монитор ресурсов).
rsrc32.dll ищи в мониторе ресурсов для Win95

Кстати вместо GetFreeSystemResources можеш использовать GlobalMemoryStatus
смотри: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/memory/base/globalmemorystatus.asp

Автор: Pakshin A. S. 20.7.2004, 18:15
Огромное спасибо!

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)