حافظ التونسي قام بنشر يونيو 20 قام بنشر يونيو 20 السلام عليكم و رحمة الله و بركاته ارى في بعض البرامج انك اذا تضغط على زر فستنسدل امامك خيارات كما في الصورة رقم 1 المطلوب هل يمكن كلك في برنامج اكسس في الصورة رقم 1 اذا ضغطت على زر ajout article فستنسدل قائمة فيها خيارات دون ان تفتح صفحة اخرى لاختار ما اريد فتحه كما في الصورة رقم 2 فان كان ممكن فسابعث لكم نموذج للعمل عليه او ان تدلوني على الطريقة و لكم جزيل الشكر
Foksh قام بنشر يونيو 20 قام بنشر يونيو 20 وعليكم السلام ورحمة الله وبركاته .. حتى لا تتشتت أفكارك بعيداً عن طلبك ، ألقِ نظرة على هذا الموضوع هنا .
حافظ التونسي قام بنشر يونيو 22 الكاتب قام بنشر يونيو 22 السلام عليكم و رحمة الله و بركاته لقد فتحت الموقع الذي ارسلته و تتبعته جيدا و حاولت ان افهم و لكني لم اتمكن من من معرفة amr1 and amr2 النتيجة تقارب ما اود ان اصل اليه و لكن يمكن يكون بطريقة اخرى وهي كما نصصت عليها في الصور المرفقة ما اردت ان اتمكن من انجازه وهو بمجرد مرور الفارة على كلمة suivi vente الموجودة في الصورة رقم 1 تظهر قائمة التي مصدرها كما في الصورة الرقم 2 و تكون نافذة على شكل الموجود في الصورة رقم 3 و لكم جزيل الشكر. النموذج الذي تركت ؤابطه هو ذو قيمة و ممكن لو كان مفسرا بفيديو لكان اكثر نفعا و لكم جزيل الشكر والامتنان على المجهود الذي تقوم به need help.rar
منتصر الانسي قام بنشر يونيو 22 قام بنشر يونيو 22 تفضل قمت بتعديل المثال لينفذ طلبك الان كل ما عليك هو فتح الوحدة النمطية Module1 وتعديل المسميات "SouSou1-SouSou2-SouSou3-....SouSou14" إلى أي أسماء ترغب بها تحياتي internet.rar 1
حافظ التونسي قام بنشر يونيو 23 الكاتب قام بنشر يونيو 23 السلام عليكم و رحمة الله و بركاته جميل جدا هذا التعديل و كلمة الشكر لك و لمن ساهم ليست كافية و لكن اقولها مجددا شكرا جزيلا اود ان اسال هل لكل زر يجب ان احدث module اخر؟؟؟ ارفقت صورة لتوضيف الاستفسار و ارسلت البرنامج بعد ما عدلته حسب توجيهاتكم internet_2.rar
منتصر الانسي قام بنشر يونيو 23 قام بنشر يونيو 23 6 ساعات مضت, حافظ التونسي said: اود ان اسال هل لكل زر يجب ان احدث module اخر؟؟؟ صراحة لم أفهم قصدك !!! هل تقصد أنك تريد تكرار العملية لزر آخر غير زر (Suivi Vente) ؟ عموما إذا كنت تقصد زر آخر غير زر (Suivi Vente) فيمكنك إستخدام نفس الـ Module أو إنشاء واحد جديد ولكن أهم شرط في الحالتين هو إستخدام أسماء فريدة لكل إجراء بمعنى عدم تكرار التسميات التالية (Mouvementcompany و OpenForm1 و OpenForm2 و ...... و OpenForm14) وكآلية عمل يمكنك تنفيذها يمكنك تمييز كل قائمة بكلمة معينة فمثلاً القائمة الجاهزة هنا نميزها بالكلمة (SouSou) فإذا إحتجنا لقائمة أخرى نقوم بنسخ هذه القائمة ونقوم ببحث وإستبدال لكلمة SouSou وتعديلها بكلمة أخرى تعبر عن القائمة الجديدة هكذا ستحصل على قائمة بدون أي مجهود ولن يتبقى عليك إلا إستبدال أسماء النماذج والتسميات قد يكون الشرح بتطبيق عملي أفضل لذلك قمت بتعديل المثال كالتالي - أعدت تسميات الإجراءات والتسميات الحالية لتمييزها بكلمة (SouSou) - قمت بعملية نسخ ولصق لكل الإجراءات في نفس الوحدة النمطية ثم بحث وإستبدال لكلمة (SouSou) وتعديلها بكلمة (Retour) لكل ما تم نسخه ثم عدلت أسماء النماذج في كل إجراء إلى أسماء النماذج التي تبدأ بحرف C ستلاحظ أني لم أحتاج إلا إلى 8 إجراءات فقط - قمت بعملية نسخ ولصق للقائمة الأولى مرة أخرى ولكن تم اللصق في Module جديد ثم بحث وإستبدال لكلمة (SouSou) وتعديلها بكلمة (Recette) ثم عدلت أسماء النماذج في كل إجراء إلى أسماء النماذج التي تبدأ بحرف D ستلاحظ أني هنا إحتجت لإضافة إجراء جديد لفتح النموذج الاخير الآن ستظهر القائمة الأولى عند النقر على الزر (Suivi Vente) والقائمة الثانية مع الزر (Retour) والثالثة مع الزر (Recette) تم تحديد الازرار كمثال فلغتي الفرنسية صفر كملاحظة أخيرة يمكنك الان تعديل التسميات الخاصة بعناصر القوائم الثلاث وكذلك يمكنك نقل القائمة الثالثة إلى نفس الوحدة النمطية للقائمتين الأخريين ارجو أن يكون الشرح قد وضح لك طريقة العمل بحيث أصبح بإمكانك إنشاء قوائم أو تعدبلها تحياتي internet.rar
حافظ التونسي قام بنشر يونيو 23 الكاتب قام بنشر يونيو 23 السلام عليكم و رحمة الله و بركاته هذا ما اردت ان اعرفه وهو انشاء module لكل زر و لا ينفع module واحد لكل الازرار و ارى في بعض البرامج فانه بمجرد مرور الماوس على مكان الزر فستخرج القائمة دون الضغط عليها لتظضهر القائمة فهل هذا ممكن ؟ و لكم جزيل الشكر
منتصر الانسي قام بنشر يونيو 23 قام بنشر يونيو 23 3 دقائق مضت, حافظ التونسي said: و ارى في بعض البرامج فانه بمجرد مرور الماوس على مكان الزر فستخرج القائمة دون الضغط عليها لتظضهر القائمة فهل هذا ممكن ؟ شاهد المرفق internet.rar 1
حافظ التونسي قام بنشر الأربعاء at 07:42 الكاتب قام بنشر الأربعاء at 07:42 (معدل) السلام عليكم و رحمة الله و بركاته جميل جدا جدا جدا جازاك الله خيرا على هذا العمل الرائع و ساتدلل عليك اكثر وهو لمزيد المنفعة لي و لكل طالب معلومة وهو لو تكرمت و اريتنا كيف عملت هذا العمل خطوة بخطوة لنتعلم و لا ناخذ المعلومة دون ان نعرف خطوات انشاءها و لكم جزيل الشكر تم تعديل الأربعاء at 07:43 بواسطه حافظ التونسي خطا في الكتابة
منتصر الانسي قام بنشر الأربعاء at 13:15 قام بنشر الأربعاء at 13:15 5 ساعات مضت, حافظ التونسي said: و ساتدلل عليك اكثر وهو لمزيد المنفعة لي و لكل طالب معلومة وهو لو تكرمت و اريتنا كيف عملت هذا العمل خطوة بخطوة لنتعلم و لا ناخذ المعلومة دون ان نعرف خطوات انشاءها و لكم جزيل الشكر لم أقوم بأي شيئ إضافي سوى أنني كررت الامر الخاص بحدث Click للزر إلى حدث MouseMove 'هذا حدث النقر على الزر Private Sub Commande50_Click() SouSouMenu End Sub 'MouseMove وهذا حدث Private Sub Commande50_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) SouSouMenu End Sub
حافظ التونسي قام بنشر منذ 1 ساعه الكاتب قام بنشر منذ 1 ساعه السلام عليكم و رحمة الله و بركاته مشكورا جدا على المعلومات التي قدمتها لي و سوف احاول ان اتبع الخطوات و ابحث عن موقع كل كلمة او جملة احدثتها لاتمكن من اعدادها باسماء اخرى لارى ان كان سيحدث خطا ما لاتعلم و لكم جزيل الشكر
الردود الموصى بها
انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد
يجب ان تكون عضوا لدينا لتتمكن من التعليق
انشئ حساب جديد
سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .
سجل حساب جديدتسجيل دخول
هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.
سجل دخولك الان