精品久久看,欧美成人久久一级c片免费,日本加勒比在线精品视频,国产一区二区三区免费大片天美,国产成人精品999在线,97理论三级九七午夜在线观看

東坡下載：內容最豐富最安全的下載站！

首頁 → 編程開發 → Delphi → Delphi XE7 取得進程占用內存的兩個函數

Delphi XE7 取得進程占用內存的兩個函數

相關文章發表評論 來源：本站整理時間：2016/4/1 17:49:46字體大�。�A-A+

更多

作者：專題點擊：456次評論：0次標簽： Delphi

//取得指定進程占用內存
function GetProcessMemUse(PID: Cardinal): Cardinal;
var
  pmc: PPROCESS_MEMORY_COUNTERS; // uses psApi
  ProcHandle: HWND;
  iSize: DWORD;
begin
  Result := 0;
  iSize := SizeOf(_PROCESS_MEMORY_COUNTERS);
  GetMem(pmc, iSize);
  try
    pmc^.cb := iSize;
    ProcHandle := OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ,
      False, PID); // 由PID取得進程對象的句柄
    if GetProcessMemoryInfo(ProcHandle, pmc, iSize) then
      Result := pmc^.WorkingSetSize;
  finally
    FreeMem(pmc);
  end;
end;

//取得當前進程占用內存
function CurrentMemoryUsage: Cardinal;
 var
   pmc: TProcessMemoryCounters;
 begin
   pmc.cb := SizeOf(pmc) ;
   if GetProcessMemoryInfo(GetCurrentProcess, @pmc, SizeOf(pmc)) then
     Result := pmc.WorkingSetSize
   else
     RaiseLastOSError;
 end;
//調用上面兩個函數，返回當前進程占用內存
function GetCurrentMemUse: Cardinal;
begin
//  Result := GetProcessMemUse(GetCurrentProcessId);
    Result:= CurrentMemoryUsage ;
end;

//顯示
procedure TForm1.tmr1Timer(Sender: TObject);
begin
  stat1.Panels[0].Text := format('memory use: %d KB', [GetCurrentMemUse div 1024]);//1kb=1024b
end;

  • delphi精簡版合集
  • delphi學習工具
  • delphi補丁
  • delphi下載
delphi精簡版合集
(9)delphi精簡版合集

為什么要選擇精簡版，Delphi原版一般體積都是比較大的，由期是從 delphi 2007 開始原版都是在1G以上，但里面是有很多比如幫助文件，一些沒用的源文件一般我們也用不到，第二就是原版下載一來后如果要去破解也是一件比較麻煩的事情，需要替換文件等等，東坡給大家整合的精版體已經都集成了破解補丁，大部份Lite版本都是從網上搜集到的由lsuper制作的。這個 Lite 或者說是 Repack，就是為了方便 Delphier 們能方便的嘗試 Delphi 的新功能，同時對系統的影響降到最小。至于用 Lite/Repack 還是原版，見人見智啦！

...更多>>
delphi學習工具
(104)delphi學習工具

delphi的學習其實很容易，只要你找到了他的原理，然后參考一些專業書，基本上一個星期就能上手，但是要成為高手，那就是還是要一定的經驗積累，其實做任何事情都一樣，這里為您提供了delphi的各種參考教程，delphi學習的電子書，以及delphi的一些小工具。

...更多>>
delphi補丁
(6)delphi補丁

delphi原版都是英文版本，但是中國人還是比較習慣中文，所以就有大神為大家提供了中文補丁，然而沒有破解，也是然并卵，哥們可是冒著極大的風險為大家提供的delphi破解補丁，最看不慣一些公司打著正版的旗子，到處維護版權什么的，如果什么都要正版，中國的IT怎么發展。


...更多>>
delphi下載
(12)delphi下載

delphi的前身就是80后初學編程的語言pascal，那時候我對pascal學得還不錯，但是delphi至今還是不會，但是對delphi一直關注與收藏，最近因為發了點小財，想換個電腦，所以把收集的delphi全部整理出來了，或是還不是很全面，但是希望能幫助到有需要的兄弟們。

...更多>>

相關文章

擴展知識

相關評論

閱讀本文后您有什么感想? 已有 人給出評價!

  • 2791 喜歡喜歡
  • 2101 頂頂
  • 800 難過難過
  • 1219 囧囧
  • 4049 圍觀圍觀
  • 5602 無聊無聊
熱門評論
最新評論
昵稱:
表情: 高興 可 汗 我不要 害羞 好 下下下 送花 屎 親親
字數: 0/500 (您的評論需要經過審核才能顯示)

本類常用軟件

主站蜘蛛池模板： 很很操很很日 | 漂亮大学生一级毛片 | 深夜视频免费观看 | 国产成人免费在线 | 四虎4545www国产精品 | 国产精品久久久久久久久久免费 | 伊人婷婷在线 | 婷婷免费高清视频在线观看 | 99爱精品 | 精品国产精品久久一区免费式 | 免费一级片在线 | 欧美日韩亚洲一区二区三区在线观看 | 黄色网站在线观看视频 | 精品国产_亚洲人成在线高清 | aaa级精品久久久国产片 | 久久免费99精品久久久久久 | 精品免费福利视频 | 美女网站免费久久久久久久 | 色99视频| 成人免费观看永久24小时 | 男人手机天堂 | 久久免费观看国产99精品 | 你懂得福利影院 | 久久久久久久久久久久福利 | 欧美女人性生活视频 | 久久亚洲欧美综合激情一区 | 狠狠操综合网 | 国产99区| 猛男诞生记在线观看 | 中文字幕日本一区久久 | www.99| 久久婷婷五夜综合色频 | 青青草直播 | 久久福利一区二区 | 四虎免费最新在线永久 | 免费视频久久看 | 九九资源站 | 精品久久久中文字幕一区 | 五月综合激情 | 精品不卡一区中文字幕 | 亚洲人人草 |