تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
لمعرفة حالة الذاكرة الحالية ومقدار المستخدم منها
#1
كاتب الموضوع : AhmedEssawy

عودة أخرى مع API وتحديداً مع kernel32 ، نكتب في قسم التصريحات - كاتب الموضوع موضح في الكود - :


كود :
' Author: Chong Long Choo
' Email: [EMAIL="chonglongchoo@hotmail.com"]chonglongchoo@hotmail.com[/EMAIL]
Private Declare Sub GlobalMemoryStatus Lib "kernel32" (lpBuffer _
As MemoryStatus)
Private Type MemoryStatus
dwLength As Long
dwMemoryLoad As Long
dwTotalPhys As Long
dwAvailPhys As Long
dwTotalPageFile As Long
dwAvailPageFile As Long
dwTotalVirtual As Long
dwAvailVirtual As Long
End Type
Private MemPoint As MemoryStatus

الداول المستخدمة :

كود :
Public Property Get MemoryLoad() As Long
MemoryLoad = MemPoint.dwMemoryLoad
End Property
Public Property Get TotalPhysical() As Long
TotalPhysical = MemPoint.dwTotalPhys
End Property
Public Property Get AvailablePhysical() As Long
AvailablePhysical = MemPoint.dwAvailPhys
End Property
Public Property Get TotalPageFile() As Long
TotalPageFile = MemPoint.dwTotalPageFile
End Property
Public Property Get AvailablePageFile() As Long
AvailablePageFile = MemPoint.dwAvailPageFile
End Property
Public Property Get TotalVirtual() As Long
TotalVirtual = MemPoint.dwTotalVirtual
End Property
Public Property Get AvailableVirtual() As Long
AvailableVirtual = MemPoint.dwAvailVirtual
End Property
Private Sub Class_Initialize()
MemPoint.dwLength = LenB(MemPoint)
GlobalMemoryStatus MemPoint
End Sub
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  قراءة بيانات من الذاكرة RaggiTech 0 338 17-10-12, 02:51 PM
آخر رد: RaggiTech
  لمعرفة عنوان المجلد MyDocuments RaggiTech 0 312 17-10-12, 02:23 PM
آخر رد: RaggiTech
  لمعرفة حجم الذاكرة الحية الخاصة بكل Slot RaggiTech 0 338 17-10-12, 02:22 PM
آخر رد: RaggiTech
  لمعرفة ان كانت السنة كبيسة أم لا RaggiTech 0 319 17-10-12, 02:22 PM
آخر رد: RaggiTech
  لمعرفة الوقت المستغرق منذ بدأ تشغيل الآلة RaggiTech 0 368 17-10-12, 02:22 PM
آخر رد: RaggiTech
  لمعرفة الخطوط المدعومة RaggiTech 0 327 17-10-12, 02:21 PM
آخر رد: RaggiTech
  معرفة حجم الذاكرة المؤقتة Ram والمستخدم منها RaggiTech 0 403 17-10-12, 01:06 AM
آخر رد: RaggiTech
  لمعرفة نوع المعالج المثبت في جهازك RaggiTech 0 313 17-10-12, 01:02 AM
آخر رد: RaggiTech
  لمعرفة نسبة استخدام البروسيسور في الجهاز RaggiTech 0 366 17-10-12, 01:02 AM
آخر رد: RaggiTech
  لمعرفة لو كان التحديد باستخدام Tab او باستخدام الماوس RaggiTech 0 314 17-10-12, 01:01 AM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم