Определение виртуального размера процесса с помощью delphi

У меня есть программа на Delphi, и я смотрю, как эта программа может печатать свой собственный «виртуальный размер» в файле журнала, чтобы я мог видеть, когда она использовала слишком много памяти. Как я могу определить «виртуальный размер» с помощью кода Delphi ?

Под «виртуальным размером» я подразумеваю значение, отображаемое Process Explorer . Это значение не может отображаться обычным диспетчером задач. Это не напрямую использование памяти программой, а использование адресного пространства. На Win32 программа не может использовать более 2 ГБ адресного пространства.

PS: Я использую Delphi 6, но код / ​​информация для других версий тоже подойдут.