الموضوع السابق   الموضوع التالي 

ما قيمة هذه البت؟!

Function: IsBitSet

الغرض
تحديد ما إذا كانت بت (Bit) معينة قيمتها 1 أم لا.


الصيغة

function IsBitSet(TestValue, BitNumber: LongInt): Boolean;


الوسائط (Parameters)

TestValue القيمة التي نريد اختبار إحدى بتاتها.
BitNumber رقم البت التي نريد اختبارها. ترقيم البتات يبدأ بالصفر.

الشرح
إذا كنت تريد التعامل مع عدد صحيح باعتباره مجموعة من البتات فإن هذه الدالة تعيد True إذا كانت البت التي رقمها BitNumber قيمتها 1، و تعيد False إذا كانت قيمة تلك البت 0. فمثلاً الاستدعاء:

IsBitSet(11, 0);

يعيد True لأن الشكل الثنائي للعدد 11 هو 00001011. لاحظ أن البت رقم 0 (الأولى من اليمين) قيمتها 1. أما الاستدعاء:

IsBitSet(10, 0);

فإنه يعيد False لأن الشكل الثنائي للعدد 10 هو 00001010. لاحظ أن البت رقم 0 (الأولى من اليمين) قيمتها 0.


 أعلى الصفحة
 الموضوع السابق   الموضوع التالي