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

اختبار قناع من البتات!

Function: IsBitMaskSet

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


الصيغة

function IsBitMaskSet(TestValue, BitMask: LongInt): Boolean;


الوسائط (Parameters)

TestValue القيمة التي نريد اختبار مجموعة من بتاتها.
BitMask القناع الذي يمثل مجموعة البتات التي نريد اختبارها

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

IsBitMaskSet(43, 11);

يعيد True لأن الشكل الثنائي للعدد 43 هو 00101011 و هو يحتوي على العدد 11 (00001011). و كذلك الحال مع الاستدعاء:

IsBitMaskSet(43, 40);

حيث العدد 40 = 00101000. أما الاستدعاء:

IsBitMaskSet(43, 12);

فإنه يعيد False لأن العدد 43 (00101011) لا يحتوي على العدد 12 (00001100).


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