تويت
السلام عليكم ورحمة الله وبركاته
لتوضيح هذا الإجراء أكثر
01 - التصريح بعدد مرات استعمال البرنامج هنااا تم اختيار 3 مرات
02 - قراءة قيمة في الريجستري بتسمية معينة مع تحويل التعامل مع القيمة كرقم و ليست نص و هذا ما يوضحه السطر الثاني
03 - نكنب شرط اذا كانت القيمة المقروءة سابقا من الريجستري تساوي صفر و هذا طبيعي عند تشغيل البرنامج لأول وهلة
04 - ماذا يحدث ؟؟؟ سيكتب البرنامج هذا المفتاح الذي لم يجده سابقا و بالتالي قيمته 0 و يعطيه القيمة 1
05- جيد اذا تحقق شرط أن هذه القيمة أكبر من 0 وهذا طبيعي بعد الاستعمال الاول وكذلك سنحددالقيمة بأن تكون أقل من عدد المرات
06 - سيقوم برنامج بقراءة القيمة ويضيف لها واحد
07-ثم يسجلها مكان الاولى و هكذا تستمر العملية لغاية ؟؟؟
08-تحقق قيمة الريجستري تساوي تماما لعدد المرات المختار في بداية الكود
09-ليخبرنا البرنامج على انتهاء المهلة التجريبية و يغلق
10- نغلق الاكواد الان :
انتهى جمع الاكواد تحت بعضها في on startup وعاين مشروعك ليخبرك بعد المعاينة الثالثة
أن المهلة التجريبية انتهت انتهى و السلام عليكم
ملاحظة : إجراءات التعامل مع الريجستري تتطلب أن يكون البرنامج مسؤول
بدون ذلك لن تظهر النتائج
لتوضيح هذا الإجراء أكثر
01 - التصريح بعدد مرات استعمال البرنامج هنااا تم اختيار 3 مرات
كود PHP:
kiss = 3
كود PHP:
result = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\My Application", "bel", true);
result = String.ToNumber(result);
كود PHP:
if result==0 then
كود PHP:
Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\My Application", "bel",1);
كود PHP:
elseif result>0 and result<kiss then
كود PHP:
y = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\My Application", "bel", true);
e = y +1
كود PHP:
Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\My Application", "bel", e);
Dialog.Message("Notice","عدد المرات المتبقية لاستعمال البرنامج تجريبيا:"..kiss+1 - e);
كود PHP:
elseif result == kiss then
كود PHP:
Dialog.Message("Notice", "انتهت المدة التجريبية عليك بشراء البرنامج");
Application.Exit(0);
كود PHP:
end
أن المهلة التجريبية انتهت انتهى و السلام عليكم
ملاحظة : إجراءات التعامل مع الريجستري تتطلب أن يكون البرنامج مسؤول
بدون ذلك لن تظهر النتائج
تعليق