تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اداة : بطارية جهاز اللاب توب !
#1
كاتب الموضوع : رغيد الطيب
السلام عليكم ورحمة الله و بركاته


احتجت في برنامج معين (سوف احكي عنه لاحقا بإذن الله تعالى) ... الى معرفة معلومات عن حالة بطاية جهاز الاب توب الذي استخدمه ...

معلومات مثل :

- هل البطارية موصوله بالجهاز ام انها خارجه عن موضعها ؟ (BatteryExists)
- مستوى البطارية (درجة شحنها) ؟ (BatteryLevel)
- هل الجهاز موصول بالشاحن الكهربائي ؟ (IsAcOnline)
- هل البطارية في حالة شحن حاليا ؟ (IsCharging)
- هل البطارية ممتلئة 100% ؟ (IsBatteryFull)


اجابة الاسئلة السابقة يمكنك ان تجدها هنا و هناك ... وبطرق و اكواد مختلفة ... فحدثني نفسي بعمل مكتبة صغيرة Battery.DLL يمكنك ان تظيفها الى برنامجك عن طريق (Add Reference) من القائمة Project

ولكي تستخدمها ستحتاج الى سطر برمجي تضيفه الى الفورم :

كود :
Private WithEvents Battery As New Battery.rtaLaptopBattery
وبهذا يكون لديك اداة بإسم Battery و لديها اثنان من الاحداث :

OnBattery
وهذا الحدث عندما يفصل الشاحن من الجهاز

OnPower
وهذا عندما يوصل الشاحن بالجهاز

يمكنك ان تستخدمهما بشكل ممثال للتالي :


كود :
Private Sub Battery_OnBattery(ByVal Sender As Battery.rtaLaptopBattery) Handles Battery.OnBattery
MsgBox("ثم فصل الشاحن من الجهاز")
End Sub

Private Sub Battery_OnPower(ByVal Sender As Battery.rtaLaptopBattery) Handles Battery.OnPower
MsgBox("ثم توصيل الشاحن بالجهاز")
End Sub

على العموم يوجد مثال مرفق عن كيفية استخدامها



اتمنى للجميع الاستفادة منها

السلام عليكم و رحمة الله و بركاته


الملفات المرفقة
.zip   Battery.zip (الحجم : 6.12 ك ب / التحميلات : 105)
.zip   rtaBatteryInfo.zip (الحجم : 73.23 ك ب / التحميلات : 133)
}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  احلا مشاهدة تطوير اداة listbox تصبح بشكل جميله ابراهيم كركوكي 0 2,616 18-08-16, 10:03 PM
آخر رد: ابراهيم كركوكي
  [سؤال] اداة مثل tab bar في المتصفحات Mahmoud Ahmed 3 3,782 08-07-16, 11:45 PM
آخر رد: ابراهيم كركوكي
  اضافة خاصية لون الاطار في اداة GroupBox ربيع 17 10,334 29-01-15, 08:19 PM
آخر رد: abulayth
  اداة ocx جديدة جدا RaggiTech 0 2,255 17-10-12, 02:39 PM
آخر رد: RaggiTech

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


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