تمكين المستخدم من التحكم في عدم ظهور الـ Dialog مرة أخرى

[الجارف]

السلام عليكم ..

معذرة إخواني .. فقد أثقلت عليكم بالأسئلة

لدي استفسار بسيط ..

الآن وضعت الكود التالي في بدء تشغيل التجميعة لتظهر رسالة في Dialog

Dialog.Message("Notice", "السلام عليكم", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);


هل بالإمكان أن أجعل المستخدم يتحكم في عدم ظهور هذه الرسالة مرة أخرى ؟
عن طريق وضع إشارة على مربع CheckBox

كما بالصورة التالية

http://im54.gulfup.com/6j4SBR.jpg

[عبود عبود]

أعتقد أن الديالوج ميساج العادى لا يحتوى على عنصر تشيك بوكس
لذلك يمكنك تصميم صفحة أو ديالوج DialogEx ووضع العنصر فيها

[النصل القاطع]

تماما
من القوائم اضغط dialog
ثم add
ينشأ لديك dialogex جديد
أكتب فى الديالوج ماتشاء عن طريق label أو paragraph
ضع به الشكبوكس

فى نافذة الكود الخاصة بالشيكبوكس on click ضع
Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\My Application", "MyValue", "prevent", REG_SZ);


ضع هذا الكود فى بدء التشغيل
prevent = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\My Application", "MyValue", true);
if prevent ~= "prevent" then
result = DialogEx.Show("Dialog1", true, nil, nil);
else
end


و لو تريد عمل option لإرجاع الوضع لما كان عليه
Registry.SetValue(HKEY_LOCAL_MACHINE, "Software\\My Application", "MyValue", "allow", REG_SZ);
بالتوفيق

[الجارف]

تم التطبيق بنجاح .. :abc_050:

شكرًا لكما ..

أستاذ خالد لدي استفسار ..

إزاي أعمل option لإرجاع الوضع لما كان عليه ؟؟

وضعت الكود بداخل الزر .. ويعمل جيدًا

ولكن أرغب بطريقة أظرف من هذه ..

وهذا تطبيقي في المرفقات ..

[النصل القاطع]

اخى العزيز
تم تجربة المرفق و يعمل جيدا

بالنسبة للأوبشن
بداية
الأزرار لا تناسب الخيارات

فى هذه الحالة قم بعمل شكبوكش فى صفحة الخيارات و ضع فيها نفس الأمر الذى وضعته بالزر
و طالما انك أرفقت ملف مفتوح
فأنا قمت بتعديله لك
راجع المرفق

أما لو أردت لصفحة الخيارات ان تتذكر خيارك الأخير و تظهره فضع فى الحدث on show هذا الكود
prevent = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\My Application", "MyValue", true);
if prevent ~= "prevent" then
CheckBox.SetChecked("CheckBox1", true);
else
CheckBox.SetChecked("CheckBox1", false);
end

[فرح صالحي]

شكرا للجميع
:abc_152:

[الجارف]

اخى العزيز
تم تجربة المرفق و يعمل جيدا

بالنسبة للأوبشن
بداية
الأزرار لا تناسب الخيارات

فى هذه الحالة قم بعمل شكبوكش فى صفحة الخيارات و ضع فيها نفس الأمر الذى وضعته بالزر
و طالما انك أرفقت ملف مفتوح
فأنا قمت بتعديله لك
راجع المرفق

أما لو أردت لصفحة الخيارات ان تتذكر خيارك الأخير و تظهره فضع فى الحدث on show هذا الكود
prevent = Registry.GetValue(HKEY_LOCAL_MACHINE, "Software\\My Application", "MyValue", true);
if prevent ~= "prevent" then
CheckBox.SetChecked("CheckBox1", true);
else
CheckBox.SetChecked("CheckBox1", false);
end

جميل جدا أستاذي ..

وضحت فكرة عمل الاوبشن .. :abc_051:


شكرًا جزيلا على ما قدمت .. :abc_022:

[امل الماضي]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

[ahmad s.a]

السلام عليكم ورحمة الله وبركاته
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .
موفق بإذن الله ... لك مني أجمل تحية .

[العبسي]

عمل موفق

لي عودة لبعض الاستفسارات


لكم الشكر جميعا

[فاضل الجبوري]

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

[عبدوعزيز]

بارك الله فيك