إستاذنا الفاصل VFPman
الأمر
SET SYSMENU TO rtljustify
يجعل القائمة من اليمين الى اليسار داخل شاشة الـ foxpro
ولكن ماهو الكود الذى يجعل القائمة من اليمين الى اليسار داخل الفورم؟
عندما يكون الفورم مستقل
وجزاك الله خير على مجهوداتك فى كل منتديات الـفوكس برو
جلال السوهاجى
اولا لابد من معرفة كيفية اضافة قائمة الى النموذج
http://foxpro.yoo7.com/montada-f8/topic-t3.htm
وبعدين نرى تحويلها يمين وشمال
عزيزي جلال انت فتحتي باب لفكرة رهيبة بخصوص القوائم .. عموما مش راح اطول عليك انظر الى الصور وبعدين حمل البرنامج اذا حبيت.
شكرا أستاذنا على سرعة الرد
خاصبة الفورم هنا هى AS TOP LEVEL FORM
وإذا كان يمكن عمل قائمة لأى فورم .سواء كانت AS TOP أو in top level أو in screen
فشكرا لك وزودنا بهذه الأكواد
وهذا ماعهدناه فى شخصكم لجميع أفراد المنتدى.
جلال السوهاجى
شكرا أستاذنا على سرعة الرد
خاصبة الفورم هنا هى AS TOP LEVEL FORM
وإذا كان يمكن عمل قائمة لأى فورم .سواء كانت AS TOP أو in top level أو in screen
فشكرا لك وزودنا بهذه الأكواد
وهذا ماعهدناه فى شخصكم لجميع أفراد المنتدى.
جلال السوهاجى
أستاذنا VFPman
مشكوووووووووووووووووووور
ويبقى الأستاذ دايما أستاذ
وربنا يخليك لينا
جلال السوهاج
العفو يا عزيزي
قائمة النموذج الاخضر هي زي الخطوات اللي قلت لك عليها اما النموذج الازرق فانا صنعتها برمجيا .
ويرجى العلم بان هذه اول مرة اعمل بها قائمة بالشكل البرمجي. بصراحة انت فتحت على باب مشوق جدا
تعيش لينا ياباشا
إيه كل الحلاوة دى
وجارى دراسة وتعلم هذه الفورم
جلال
دائما متألق يا ابو سلطان ونتمني استخدام موضوع القوائم في مشروع (( شئون الموظفين )) لانه هايفيدنا كتير
تسلم الايادي
شكرا لجلال
شكرا للمنير
عزيزي المنير الكلاسيس لوحدها موضوع فلو دخلنا بها سوف تسبب توهان لكن لو مصمم حاضر من عيوني
وأنا أضم صوتى للأخ المنير
ونتوجه لأستاذنا الـ PIONEER OF VFPman
إفتح لنا باب الكلاسيس
وشكرا
جلال
بالراحة بلاش العصبية يا باشا
السلام عليكم ورحمة الله وبركاته
اسمح لنا يالكريم VIP_VFP_Monster وليس man مرة أن أزاحمك ولكن من باب أرسيته أنت وهو تبادل الخبرة والمنفعة
لقد اجتزت جبل القوائم بفضل الله وإليكم سطور قليلة فيها التجربة لأننى لم أعرف بعد طريقة رفع الملفات لكنى سأقتبس سطور رئيسية من ملف من صنعى
انسخ فى ملف وسمه school واعلم أن الاختيار الوحيد الذى سيعمل هو الخروج
وأى خدمة
SET SYSMENU TO
SET SYSMENU off
SET SYSMENU AUTOMATIC
SET SYSMENU TO RTLJUSTIFY
DEFINE PAD semesters OF _MSYSMENU PROMPT "الفصل" COLOR SCHEME 3 FONT "",14
DEFINE PAD namess OF _MSYSMENU PROMPT 'الأسماء' COLOR SCHEME 3 font "",12
ON PAD semesters OF _MSYSMENU ACTIVATE POPUP الفصل
ON PAD namess OF _MSYSMENU ACTIVATE POPUP "الأسماء"
DEFINE POPUP "الفصل" MARGIN RELATIVE SHADOW COLOR SCHEME 4 FONT "",14
DEFINE BAR 1 OF الفصل PROMPT 'الفصل الأول'
DEFINE BAR 2 OF الفصل PROMPT 'الفصل الثانى'
DEFINE BAR 3 OF الفصل PROMPT 'الدور الثانى'
DEFINE bar 4 of الفصل PROMPT 'إنهاء البرنامج'
ON SELECTION BAR 1 OF الفصل do prog_1 in procedurez
ON SELECTION BAR 2 OF الفصل do prog_2 in procedurez
ON SELECTION BAR 3 OF الفصل do prog_3 in procedurez
ON SELECTION BAR 4 OF الفصل do quitting in school
**********************************************************************
DEFINE POPUP الأسماء MARGIN RELATIVE SHADOW COLOR SCHEME 4 FONT "",14
DEFINE BAR 1 OF الأسماء PROMPT 'إدخال أسماء'
DEFINE BAR 2 OF الأسماء PROMPT 'تعديل أسماء'
DEFINE BAR 3 OF الأسماء PROMPT 'حذف طالب'
DEFINE BAR 4 OF الأسماء PROMPT 'فصل طالب'
ON BAR 1 OF الأسماء ACTIVATE POPUP sub_menu
DEFINE POPUP sub_menu MARGIN RELATIVE COLOR SCHEME 4 font "",12
DEFINE POPUP sub_menu MARGIN RELATIVE COLOR SCHEME 4 font "",12
DEFINE BAR 1 OF sub_menu PROMPT 'الصف الأول'
DEFINE BAR 2 OF sub_menu PROMPT 'الأول قرار'
DEFINE BAR 3 OF sub_menu PROMPT 'الصف الثانى'
DEFINE BAR 4 OF sub_menu PROMPT 'الثانى قرار'
ON SELECTION BAR 1 OF sub_menu do DELETE_names in procedurez with 1
ON SELECTION BAR 2 OF sub_menu do DELETE_names in procedurez with 12
ON SELECTION BAR 3 OF sub_menu do DELETE_names in procedurez with 2
ON SELECTION BAR 4 OF sub_menu do DELETE_names in procedurez with 22
ON BAR 2 OF الأسماء ACTIVATE POPUP sub_menu_1
DEFINE POPUP sub_menu_1 MARGIN RELATIVE COLOR SCHEME 4 font "",12
DEFINE POPUP sub_menu_1 MARGIN RELATIVE COLOR SCHEME 4 font "",12
DEFINE BAR 1 OF sub_menu_1 PROMPT 'الصف الأول'
DEFINE BAR 2 OF sub_menu_1 PROMPT 'الأول قرار'
DEFINE BAR 3 OF sub_menu_1 PROMPT 'الصف الثانى'
DEFINE BAR 4 OF sub_menu_1 PROMPT 'الثانى قرار'
ON SELECTION BAR 1 OF sub_menu_1 do DELETE_names in procedurez with 1
ON SELECTION BAR 2 OF sub_menu_1 do DELETE_names in procedurez with 12
ON SELECTION BAR 3 OF sub_menu_1 do DELETE_names in procedurez with 2
ON SELECTION BAR 4 OF sub_menu_1 do DELETE_names in procedurez with 22
activate menu _MSYSMENU nowait
*********************************
proc quitting
DEACTIVATE MENU _MSYSMENU
RELEASE MENU _MSYSMENU EXTENDED
SET SYSMENU TO DEFAULT
CLEAR ALL
CLOSE all
clear
return
العرض معكوس لا تذاكره هكذا بل انسخه واجعله من الشمال
شكرا لك عزيزي عبدالمنعم على مجهودك معنا ونتمنى المزيد
العجيب في الفوكس برو الحديث انه اتاح عدة مجالات لعمل القوائم وغيرة طبعا بواسطة استخدام الاكواد او بالطريقة الجاهزة او بالـ opjecet oriented كما في عملية الاضافة والاستعلام وو الخ.
العفو هذا بعض من بعض ما عندكم
السلام عليكم ورحمة الله وبركاته
العفو أخونا الكبير الكريم
بالنسبة لهذه القوائم قصدت تلخيصها إلى عنوانين وعدة فروع وفروع من الفرع الثانى وبناء عليها ممكن تزويدها بنفس الطريقة بالنسخ واللصق مع تغيير التسميات
وهكذا تعمل القوائم ، و _MSYSMENU هو نظام قوائم الفوكس أصلا واستخلصته من ترجمة قائمة جاهزة عملتها وعدلتهامثلما كنت أفعل مع الفورم سابقا قبل فضل الله ثم فضلك على .
وإذا كان مطلوب شرح أى جزء منها أنا فى الخدمة .
عزيزي عبدالمنعم .. طبعا الطريقة هذه عملت فيها سنوات طويلة لكن هذا لا يمنع من شرحها لاخواننا هنا في المنتدى وياريت ترفع برامج بذلك لكي تكون الصورة اسهل واوضح.
وشكرا على هذه المبادرات الطيبة ياعزيزي وجعله الله في ميزان حسناتك.
السلام عليكم ورحمة الله وبركاته
يا راجل يا طيب أشرح وأنت موجود ! العفو .
اقتباسيا راجل يا طيب أشرح وأنت موجود ! العفو .
وفيها ايه يا عم .. انت فيك الخير والبركة .
انا بصراحة وقتي مزدحم جدا عندي مشروع شئون الموظفين للمنتدى (تدريبي) متعطل وحبيبنا المنير عندة برنامج للمندوبين عاوزين نظبط بعض المسائل به واختنا شعاع برنامجها تعطل اكثر من عشرة ايام ارجوا ان تعذرني وكمان عندي مسائل عاوزة تتحل لبعض الزملاء. :)
بلاش تجيب سيرتي الاعضاء بدأت تخلي عنها علي :angry:
مشكووووووووووووووووووووووور
السلام عليكم ورحمة الله وبركاته
يا إخواننا الكرام دعونا نتعاون سويا من باب سددوا وقاربوا
الفاضى يسد وهكذا ، ويكفى روح الود والنية الخالصة فى التعاون ، والبركة من عند الله سبحانه وتعالى
كنت قد قلت أن السطور التى كتبتها فى المشاركة فى الصفحة السابقة هى عبارة عن برنامج قائمة صغير
ولم أكن أعرف حتى أمس كيف الرفع. والآن بعد أن عرفت كيف : إليكم البرنامج فى سطور قابلة للتنفيذ بالأمر do school
والقوائم اثنان فقط يمكن عن طريق النسخ واللصق زيادتها
والتمرين يزيدكم إن شاء الله ، وأنا معكم وفى الخدمة
ها هو البرنامج يا أعزاء
http://www.4shared.com/file/42662357/506a9c2f/school.html
بعد كل do اكتب اسم procedure لك
نفذه ولا تختار من القوائم إلا إنهاء البرنامج
الانتقال يكون بتمرير الماوس فقط ولا حاجة للضغط
تم تعديل هذه المشاركة بواسطة عبد المنعم محمد عبد الخالق في 2 أبريل 2008 في 12:06
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…