顯示目前記憶體使用狀態
拉三個 Label 元件隨便放,再拉一個 Timer 元件,設定間隔一秒(1000)左右,事件內容如下:
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
TMemoryStatus MemoryStatus;
MemoryStatus.dwLength = sizeof(MemoryStatus);
GlobalMemoryStatus(&MemoryStatus);
Label1->Caption = "實體記憶體總量: "+IntToStr(MemoryStatus.dwTotalPhys/1024)+" KBytes";
Label2->Caption = "剩餘可用的記憶體量: " +IntToStr(MemoryStatus.dwAvailPhys/1024)+" KBytes";
Label3->Caption = "記憶體使用率: " +IntToStr(MemoryStatus.dwMemoryLoad)+" %";
}
/*
MemoryStatus 結構如下,還想顯示其它資訊的自己加:
typedef struct _MEMORYST ..
訪客只能看到部份內容,免費 加入會員 或由臉書 Google 可以看到全部內容