الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كود عجيب او سحري او انا لا افهم

مغلق
بدأه MiNi.SpIdEr في 16 يوليو 2007 · 5 رد · 681 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحم الرحيم

هذا لحفظ التغيير في اداة الجيك ((الصح))

SaveSetting App.Title, "Settings", "SaveInCheck1", Trim(Check1.Value)

وهذا للاسترجاع يعذ يذكر ما تم حفظه

Check1.Value = GetSetting(App.Title, "Settings", "SaveInCheck1")

هذا الكود عندما كتبته اول مره لم يعمل ولكن عندما جربت مره ثانيه اشتغل

ولكن عند تغيير اسم البرنامج اقصد التايتل يتوقف عن العمل وهذا الشيء حيرني !!!!!!!!!!!!!!!!لماذا

ولكن عندما نتهيت من البرنامج كان يعمل وكل شيء تملم ولكن عند ارساله لاي شخص لا يعمل وعانيت كثيرا من هذه المشكله

وعندما استخدمت الكود في برنامج ثاني ولم يعمل مع تغيير التايتل او بدون

انتبهت ان الخطأ الذي ظهر لي هنا هو نفس الخطأ الذي كان يظهر للذين ارسل لهم البرنامج وكان رقمه 13

فهل حقأ المشكله في الكود ام انه خاطأ اصلا وكيف يعمل عندي فقط وما علاقته بالتايتل

وطلب اخير كود بديل لهذا يقوم بحفظ ما يحدث في اداة الجيك ((الصح)) وشكرااا

[moveleft]

MiN! SpId3r SqUaD

[/moveleft]

#2

ممكن تبعتلي اخي مثال بالسورس كود

واحاول احلها إن شاء الله

#3

مسألة عدم عمل الكود عند تغيير التيتل أمر طبيعي لانك تستخدمه في انشاء الكاي باستعمال App.Title ويمكن تفادي هذه المشكلة بتثبيت القيمة مثلا ضع "MyProg" بدلا من App.Title

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

Check1.Value تستقبل قيمة 0 أو 1 أو false أو True

لذلك قم بتحويل القيمة المستخرجة اما باستعمال val او cbol

والله أعلم

#5

شكرااااااااااااا جزيل الشكر للجميع لقد افادني كود الاخ TareqVB

اما طريقه استبدال للاخ DreamNet بخصوص التايتل فجوبهت بالخطأ ؟؟؟؟

اما الاخ hamata لا داعي للسورس اولا لقد حلت ثانيا الكود عندك وجرب عليه المشكله فيه فقط

وشكرااا مع اني لم اعرف لماذا كان يعمل عندي فقط؟؟؟؟ !!!! محير

[moveleft]

MiN! SpId3r SqUaD

[/moveleft]

#6

هي المشكلة في اول مرة للتشغيل وبعد ذلك يعمل بشكل صحيح على حيث تصبح هذه القيمة موجودة قالظاهر انه على جهازك تجاوزت هذه المشكلة بطريقة ما

هذا الموضوع مغلق.

مواضيع مشابهة