如何取得在 "工作管理員" 中的各個資訊 |
|
尚未結案
|
|
Akqj1098
一般會員   發表：14 回覆：60 積分：14 註冊：2002-05-17 發送簡訊給我 |
|
|
allenchan
資深會員  發表：10 回覆：306 積分：283 註冊：2004-01-06 發送簡訊給我 |
|
|
Akqj1098
一般會員 發表：14 回覆：60 積分：14 註冊：2002-05-17 發送簡訊給我 |
|
|
jbinfo
一般會員 發表：9 回覆：25 積分：16 註冊：2004-05-10 發送簡訊給我 |
不知道這對你有沒有幫助,下面有實體記憶體(physical),分頁(paging)及虛擬(virtual)
procedure Tfm_Fram.Timer1Timer(Sender: TObject);
var
GlobalMemoryInfo:TMemoryStatus;
begin
GlobalMemoryInfo.dwLength :=SizeOf(GlobalMemoryInfo);
GlobalMemoryStatus(GlobalMemoryInfo);
Label1.Caption :='Record Structure Size: ' IntToStr(GlobalMemoryInfo.dwLength ) 'byte';
Label2.Caption :='Current Memory Load:' IntToStr(GlobalMemoryInfo.dwMemoryLoad ) '%';
Label3.Caption :='Total physical memory:' Format('%.0n',[GlobalMemoryInfo.dwTotalPhys/1]) ' bytes';
Label4.Caption :='Total available physical memory: ' Format('%.0n',[GlobalMemoryInfo.dwAvailPhys/1]) ' bytes';
Label5.Caption :='Total paging file size: ' Format('%.0n',[GlobalMemoryInfo.dwTotalPageFile/1]) ' bytes';
Label6.Caption :='Total available paging file memory: ' Format('%.0n',[GlobalMemoryInfo.dwAvailPageFile/1]) ' bytes';
Label7.Caption :='Total virtual memory: ' Format('%.0n',[GlobalMemoryInfo.dwTotalVirtual/1]) ' bytes';
Label8.Caption :='Total available virtual memory: ' Format('%.0n',[GlobalMemoryInfo.dwAvailVirtual/1]) ' bytes';
end;
祝好運!!
|
|
Akqj1098
一般會員 發表：14 回覆：60 積分：14 註冊：2002-05-17 發送簡訊給我 |
謝謝您的回答
您提供的資訊，我也陸陸續續的找到
但還有一個資訊，我最想要，卻也最難找
希望您能持續幫忙我 我要找的資訊最主要的就是
"工作管理員" 中的 "確認負載" 的 "總共"
其實也就是 "記憶體的使用量"
(工作管理員中，它跟CPU的使用都會用圖示表示的那個部分) 感恩感恩
引言:
不知道這對你有沒有幫助,下面有實體記憶體(physical),分頁(paging)及虛擬(virtual)
< >< >< >< >
|
發表時間：2004-12-13 08:48:18
IP:203.66.xxx.xxx 未訂閱
系統時間：2024-05-02 19:26:04
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |