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

[ تمت الإجابة ]ظاهرة مزعجة هل من طريقة لتجنبها ؟ فيما يختص بنسخ ولصق الاكواد المتشابها

بدأه shadi77 في 2 فبراير 2009 · 6 رد · 724 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

مرحبا كيفكم يا اساتزة

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

فعلى سبيل المثال

زر اضافة في فورم1 يحتوي كود الاضافة وهو صحيح

زر اخر للاضافة في نفس الفورم يحتوي على نفس الكود لكن مع تغير لارقام التكست والليبل وما شابه

المشكلة التي واجتني

عندما قمت بنسخ كود الزر الاول ولصقه في محتوى الزر الثاني والتعديل على ارقام كود الزر الثاني تفاجئت بتغير الارقام ايضا في الزر المنسوخ منه !! اي تغير نص المنسوخ غير في نص المنسوخ منه :wacko: مما ادى الى وجود زرين متشابهين طبق الاصل

هل هناك وسيلة لتفادي هذه الظاهرة مستقبلا ام على كتابة الاكواد يدويا وتجنب النسخ واللصق؟؟

ودمتم سالمين

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

#2

السلام عليكم

هل انت متاكد ان الازرار ليست array

#3

طبعا موضوع ان الرقم متكرر في الإجرائين ده سهو منك .. والسؤال المتوقع هو كيف انجوا من مشاكل السهو ؟

وطبعا موضوع السهو ده قل ما نهرب منه .. والطريقة الوحيد هي ترتيب الاكواد والأفكار وتوحيد المنبع

اي تصميم Sub مثلا وإعطائها الرقم الموجود عند النداء عليها .. وهي تقوم باللازم


' هنا تكتب اللى انت عاوزه مع مراعاة إستخدام المعرف أعلاه بدلا من الرقم
End Sub
Private Sub MYProcedure(ByVal MYNumber As Long)

الحقيقة انا مش متاكد اذا فهمتك صح ولا لا .. وباعتذر لو الرد مش في محله

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#4
abo-hemaia كتب:
السلام عليكم

هل انت متاكد ان الازرار ليست array

بعتذر بس مافهمت قصدك وكيف اعرف اذا كان الازرار عندي array ام لا

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

#5
mrx_ta7ady كتب:

طبعا موضوع ان الرقم متكرر في الإجرائين ده سهو منك .. والسؤال المتوقع هو كيف انجوا من مشاكل السهو ؟

وطبعا موضوع السهو ده قل ما نهرب منه .. والطريقة الوحيد هي ترتيب الاكواد والأفكار وتوحيد المنبع

اي تصميم Sub مثلا وإعطائها الرقم الموجود عند النداء عليها .. وهي تقوم باللازم


' هنا تكتب اللى انت عاوزه مع مراعاة إستخدام المعرف أعلاه بدلا من الرقم
End Sub
Private Sub MYProcedure(ByVal MYNumber As Long)

الحقيقة انا مش متاكد اذا فهمتك صح ولا لا .. وباعتذر لو الرد مش في محله

كلامك صح يا بروفيسور لكن بصراحة ليس ما قصدته :blush: في سؤالي

انا اطلت سؤالي لكن يمكن لسى بيفتقد التعبير الصحيح لكن رح احاول اكرر المشكلة بتوضيح اعمق وبكلمات اقل

لدي فورم فيه زر اضافة1 وزر اضافة2

كل واحد منهما مختص باضافة بيانات الى قاعدة بياناته الخاصة

وكون ان الزريين اضافة فمحتواهما متشابه بالكود

قمت بكتابة الكود للزر الاول وانهاءه

ولاختصار الوقت قمت بنسخ الكود كاملا ولصقه في محتوى زر الاضافة الثاني على اعتبار انه لنفس الغرض لكن قمت بتعديل ارقام التكست بالزر الثاني ليقوم بعمله صحيح

المشكلة:

عند مراجعة كود الزر الاول الذي نسخت منه الكود وجدت بانه تغير تلقائيا واصبح مشابها للكود الثاني الذي اجريت التعديل عليه

اي ان التعديل على الزر الثاني عدل ايضا مصدر النسخ

هي مشكلة الحقيقة تكررت معي وحبيت اسالكم اذا الها حل .... وبس :wink:

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

#6

بالطبع يا اخي مستحيل انك تغير في مكان واحد والتغيير يعتمد على مكانين .. إلا في حالتين

الحالة الأولى انك تغير في الكلام قبل ما تاخد منه Copy

الحالة التانيه انك تكون غيرت في الاتنين ونسيت :S

والحل بالنسبة للحالة الأولى هو إنك تاخد Copy الأول من الكلام وبعدين تعدل عليه

والحل بالنسبة للحالة التانيه هو انك تاخد بالك بس :haha: مش اكتر

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#7

صح يا ريس

الحل هنا

اقتباس
"والحل بالنسبة للحالة الأولى هو إنك تاخد Copy الأول من الكلام وبعدين تعدل عليه"

B)

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

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…