حفظ الاعدادت فى مسجل النظام Registry
صفحة 1 من اصل 1 • شاطر
حفظ الاعدادت فى مسجل النظام Registry
بسم الله الرحمن الرحيم
اهلا بكم أخوانى ....اليوم أن شاء الله تعالى سنتعلم سويا كيفية حفظ إعداد
البرنامج فى مسجل النظام ....فمثلا قمت بعمل برنامج وجعلت المستخدم قادر على تغير
بعض الاعدادات أثناء التنفيذ بأنه مثلا يقوم بأختيار لون معين كخلفية للنافذة
...فمن البديهى طبعا أن يظهر له مربع أختيار الالوان ثم بعد ذلك تطبيقة على النافذة
....وسوف يتم فعلا التطبيق لكن ماذا سيكون لون تلك النافذة بعد أغلاق البرنامج و
فتحه مرة أخرى ....الاجابة بالطبع لن تجد اللون الذى تم اختياره من قبل المستخدم
......
لذلك موضوعنا اليوم هو كيفية حفظ تلك الاعدادات سواء كانت ألوان أو نصوص أو قيمة
لمربع أختيار متعدد أو خانة أختيار ...
أولا : حفظ الاعدادات ...ويتم ذلك بأستخدام الكود التالى :
SaveSetting App.EXEName, "SectionName, "ValueName", "Value"
فمثلا اريد حفظ القيمة الموجودة فى option1 اذن الكود سيكون على النحو التالى
:
- الكود:
SaveSetting App.EXEName, "form1", "Option1", Option1.Value
وكما هو أعلاه ...بدئنا كود الحفظ بأستخادم الامر SaveSetting ثم اتبعناه
بالامر App.EXEName ثم كومة و بين علامتى تنصين كتبنا اسم المفتاح form1 ثم اسم
القيمة option1 القيمة المراد حفظها فى الريجستير و هى قيمة option1
ويمكن تغير الاسماء الخاصة بأسم المفتاح أو أسم القيمة كما يحلو لك ....فمثلا
سأقوم بحفظ اللون الموجود فى text1 على النحو التالى :
- الكود:
SaveSetting App.EXEName, "mmmm", "vvv", Text1.BackColor
ففى المثال السابق غيرت اسم المفتاح واسم القيمة الى mmmm و vvv و القيمة
المراد حفظها هى لون خلفية text1
ثانيا : أسترجاع القيم المحفوظة ....ويتم ذلك على النحو التالى :
Setting = GetSetting(App.EXEName, "SectionName", "ValueName")
ويجب ملاحظة أن كلمة Setting تعبر عن القيمة التى تم حفظها ...فمثلا فى
المثالين السابقيين تم حفظ قيمة كل من Option1.Value و Text1.BackColor و
بالتالى فأن عملية الاسترجاع ستكون على النحو التالى :
- الكود:
Option1.Value = GetSetting(App.EXEName, "form1", "Option1")
- الكود:
Text1.BackColor = GetSetting(App.EXEName, "mmmm", "vvv")
و هكذا نكون قد حفظنا تلك الاعداد فى مسجل النظام Registry ...و ارجوا أن يستفاد
منه الجميع
السنى- ........
- تاريخ التسجيل : 18/02/2011
المساهمات : 249
النقاط : 464
التقيم : 25
الجنس :
| |
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى
أمس في 8:56 pm من طرف moslema_r
» شركة مكافحة حشرات في راس الخيمة
أمس في 8:34 pm من طرف moslema_r
» تطبيقIncogniton لإدارة ملفات تعريف متعددة للمتصفح
الأربعاء أبريل 24, 2024 3:51 pm من طرف زاكااا
» افضل شركة مكافحة النمل الابيض بالرياض
الإثنين أبريل 22, 2024 9:41 pm من طرف moslema_r
» Exemplary Сasual Dating - Verified Women
الخميس أبريل 18, 2024 9:18 pm من طرف wdqwd
» رش الدفان بالرياض
الخميس أبريل 18, 2024 7:11 pm من طرف moslema_r
» شركة تنظيف خزانات الشارقة
الخميس أبريل 18, 2024 6:57 pm من طرف moslema_r
» شركة مكافحة الفئران بالرياض
الإثنين أبريل 15, 2024 8:23 pm من طرف moslema_r
» افضل شركة كشف تسربات المياه بالباحة
الخميس أبريل 04, 2024 7:02 am من طرف gmalnagy
» ساعدوني وفهموني help me
الجمعة مارس 29, 2024 8:37 am من طرف linesoft