-------باب القوائم------- معدل

:clapping: شكرا عبدالمنعم

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

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

العفو إخوانى الأفاضل فأنا فى الخدمة

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

تعاكسنى الكتابة كثيرا وأعدل مرات كثيرة ولا تفلح معى

والسطر الأخير لتنفيذ البرنامج أو استدعاؤه من أى مكان فى البرنامج هو :

on selection bar number of menu item do func or proc in filename
على سبيل المثال :
on selection bar 1 of age do myproc_name in procedure_file

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

فى برنامجك سيحدث خطأ إن كان كل الاختيارات متاحة عند بدء البرنامج

إذ هناك بعض الأوامر التى لا تتم إلا بعد الأخر مثلا

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

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

كيف يكون الشرط ؟

بكل بساطة الأمر بسيط ولكن إضافته غير بسيطة .

الأمر skip for وصيغته :

SKIP FOR (var_x = .t.(or.f.) )
وتوضع هذه الجزئية بعد أى تعريف define bar

define bar 1 of sub_menu_name prompt 'name' skip for (var_name = .t. and var_2 = .f.)

ولكن التركيز على المتغير الذى سيحكم هذا البند فى برنامجك

اجعله public ويتغير فى أماكن بالبرنامج بحيث يصبح كما تريد عند فعل كذا أو دخول المستخدم الفلانى

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

on selection bar 1 do func or proc

التحكم فى حجم خط بنود القائمة:

يمكنك تحديد كيفية ظهور بنود قائمتك : نوع الخط ، ولون القائمة ، ولها ظل أم لا ، ومستوى تباعد البنود :

لتحديد نوع الخط وحجمه الذى سوف تظهر قائمتك به :

أضف هذه الجزئية :

أى هذا الخط بحجم 12 ، والأفضل لى شخصيا كالتالى :

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

ويكون إضافة هذه الجزئية بعد :

كالمثال التالى :

أو

ولاحظ أننا لا نستخدم هذه الجزئية مع define bar حيث إن البار منسدل من pad أو من popup وسينطبق عليه الأمر لأنه صدر على المنسدل منها أصلا

وفقنى الله وإياكم وزادنا علما

السلام عليكم

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

و لدي سؤال و هو هل بإمكاني تصميم MENU دون اللجوء إلى طريقة البرمجة كما أوضحت في المثال الأول MENU و من ثم نضيف برنامج له الامتداد PRG و نعدل فيه على سبيل المثال يعرض على اليمين تعديل الخط .....

و مشكور مسبقا

عفوا أخى الكريم

لم أفهم قصدك ، لكنى سأرد عشوائيا وأرجو أن يصيب كلامى ما تريد

إن كان قصدك أنك تعرف طريقة العمل فى MENU وتريد جعلها من على اليمين فتحكمك فى القائمة ليس كما الطريقة التى شرحتها

وإن كان قصدك أنك تريد برنامج (ملف)PRG وتكتب فيه SET SYSMENU TO RTLJUSTIFY فأيضا يا أخى الملف الناتج من الترجمة عن طريق الأمر GENERATE هو ملف ينفذه فوكس ولا فرق بينه وبين PRG وحتى يمكنك تغيير الامتداد ( إعادة تسميتهPRG) ولن يحدث أى فارق ، بل ويمكنك أيضا أن تضع فى هذا الملف PROCEDURED أو FUNCTIONS أخرىويتم تنفيذها مع تنفيذ أوامر القائمة إذ أن القائمة هنا أوامر مثل باقى الملف

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

هذا ملف مبسط لقائمة به قوائم منسدلة ومن المنسدل أيضا ينسدل POPUP وتركت فيه الأمر (إنهاء البرنامج) فقط هو الذى يعمل لآنى اجتزأته من ملف لبرنامج لى

السلام عليكم

أخي عبد المنعم قصدي في السؤال أنني و من خلال قائمة Menu للفوكس برو أشكل Menu و من ثم أعدل فيه كما أوضحت لنا في المثال Menu.zip و لي تعقيب أخر و هو أنني وضعت Font "",12 بعد DEFINE PAD لكن لم يتغير شكل القائمة الأساسية و التي بها FILE,EDIT,CLOSE لكن اشتغلت بعد DEFINE POPUP فأين المشكلة.

و شكرا جـــــــزبلا و بارك الله فيك

السلام عليكم

أخي عبد المنعم شكرا لك

الأخ العزيز عبدالمنعم محمد :calc:

شكرا لك على ماتمدنا به من معلومات فى مجال برمجة الـ foxpro .

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

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

وياريت بعد كل شرح إضافة example يوضع التطبيق العملى للشرح سواء كان نموذج وهذا هو الأفضل أو تطبيق كامل . :hmm:

مثل مايفعل أخونا العزيز pioneer VFPman

لآن المثال الحى يساعدنا على دراسة وتطبيقه .

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

أخوك

جلال السوهاجى :mad:

السلام عليكم

أخي الفاضل عبد المنعم

قمت باتباع الخطوات التالية من أجل تطوير Menu إن صح التعبير و هي Project Manager - Other - Menus -New و كانت العناوين بالعربية و عندما أقوم بعملية Compilation للحصول على Exe يعطيني Message (Syntaxe error) و هذا عند تنفيذ Exe فقمت بتغيير العناوين إلى الأنجليزية جرى كل شيء على ما يرام أين يكمن المشكل و هل طريقة عمل Menu بالبرمجة أحسن من هذه الطريقة و مشكور مسبقا.

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

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

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

وأنا فى خدمتكم ومن كل عيونى وأعماق قلبى ألبى .

ثم من يقدر أن يكون مثل البايونيير ، نحن فقط نحاول أن نسير على دربه

أشكر اليد الخفية النظيفة التى نظفت طريقة كتابتى العفشة ، وأيضا ثبتت المشاركة مما يجعلنى أتحمل مسئولية لا أعتقد أنى أهل لها فاللهم أعننى عليها وعليكم يا أحباب :

اعتبر يا أخى الكريم أنى لم أقل شيئا عن القوائم وابدأ معى من الآن :

أولا مفاهيم ثبتها عندك :

1- pad هى اختيارات القائمة التى فى السطر الرئيسى مثل القائمة التى فى برنامج الفوكس نفسه مثل file,edit وغيرهم

2- bar : وهو الاختيار الذى ينسدل من file مثل open أو save

3- popup : وهى القائمة المنسدلة التى يكون فيها الاختيارات bar

كما فى الصورة التالية :

وإليكم هذه السطور ولنتدارسها معا :

ثم إليك الملف للتحميل والتجربة وهو نفس السطور وقد جربته

menu_try.zip

ومن هذه يمكن نسخ ولصق أجزاء التعريف وتغيير الأسماء كما سنتابع معا لكن أولا اتقن هذه الجزئية ولا يجب عليك حفظها لكن افهم سير عملها وفقط وقلدها فى أجزاء أخرى من نفس الملف الـprg ونفذه بالأمر do

وأنا فى الخدمة يا أفاضل

أخي الفاضل بارك الله فيك و زادك علما

و أتمنى أن تكمل على هذا المنهاج فنحن في انتظار كل معلومة تخص VFP و أن تكون دروس متسلسلة

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

السلام عليكم

اخي الكريم محمد عبد المنعم

جزاك الله خير فعلا شرح مفصل وجميل

وانا لم افعل شيئا فقط ترتيب الكتابة وموضوعك قيم يستحق التثبيت

اتمنى ان تستمر بنفس طريقة الشرح

جزاك الله خيرا أخونا الكريم Mostafa على التنقيح والتثبيت ، وشكرا أيضا للأخوة المتابعين .

الملف الذى أرفقته فى المشاركة السابقة menu_try.prg ليكن نواة ملف يكبر معنا بعد أن ينفذه الأخوة وينجحوا فيه ويدرسوه سنكمل به مشوارنا لنعمل قائمة بها كل الاختيارات المطلوبة بالشكل الذى يريده المبرمج .

فأرجو التطبيق والمدارسة وموافاتنا بالنتائج مشكورين . وأنا فى خدمتكم . وسأبدأ الليلة أو غدا إن شاء الله أى باب آخر لننتفع سويا .

رب زدنى علما وإياكم

الأخوة الكرام : سنطور معا ملف القائمة السابق لكى يزيد عدد اختيارات القائمة الرئيسية pad إلى اثنين :

وفي هذه المرة تم نسخ كتلة القائمة إلى كتلة أخرى باسم ( تجربة2) وينسدل منها قائمة أخرى مع تغيير صغير فى التسمية :

ويظهر لك ناتج اختيارك ويمكنك التعديل بما يتفق مع طلبك فى برنامجك

انظر الصورة التالية :

وإليكم الملف بعد التزويد أرجو دراسته جيدا وتنفيذه ، وعند اختيار أى bar من popup تابع على الشاشة الناتج فسيوضح لك سير العمل .

menu.zip

السلام عليكم

الف الف شكر على المجهود الرائع

أخي عبد المنعم نحن نتابع و نتمرن و ننتظر بفارغ الصبر كل جديد بارك الله فيك و زادك علما و نفعا و جعلها في ميزان حسناتك

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

الآن سنجعل أحد الاختيارات بالقائمة تحت تصرفنا . أى سيكون متاح بشروط

والشرط هنا هو متغير يكون أداتنا فى إضهاره أو جعله باهت لا يستطيع المستخدم أن يختاره

الأمر الذى يعمل هذا هو skip والمتغير هنا هو adding

ويمكنك فى أى مكان بالبرنامج أن تجعل هذه القيمة تتغير من .f. إلى .t. وبالعكس حسب احتياجات برنامجك .

وهذا يفيد فى مواضع كثيرة وتجدها فى البرامج الكبرى كلها

مثلا : لا يصح أن يكون اختيار إضافة سجلات للقاعدة متاح إن لم نكن قد فتحنا القاعدة قبل ذلك

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

menu.zip

السلام عليكم

جزاك الله خيرا اخي الكريم

اضافة بسيطة للجزء الخاص بعمل عدم تنشيط لاختيار معين

ممكن نستخدم الكود ده في اي مكان

وذلك لتعطيل - تعديل
SET SKIP OF BAR 2 OF monsadela .T.

ولمعرفة هل الاختيار مفعل ام لا

xTst = SKPBAR("monsadela",2)

وأنا شخصيا أستخدم فى برامجى التعامل مع المتغير ليس لسهولته ولكن من اسمه سأعرف وظيفته وماذا ومتى أريده

وستكون القائمة غائبة عن عينى ورقم الاختيار وعنوان القائمة حفظهم أو مراجعتهم أسهل أم متغير لاسمه دلالة ؟

وبك يكون الجمال يا مايسترو

السلام عليكم

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

وربنا يعينك ويوفقك

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

ما زلنا فى إطار ضبط القوائم وجعلها تامة الخدمات والشكل .

اليوم سنتعرف على بعض تغييرات الخصائص :

أولا : لتغيير الخط المستخدم وحجمه : ويكون ذلك مع popup و bar فقط ولا يتم مع pad .

يضاف الجزء التالى بعد تعريف أى من الاثنين السابقتين :

font="",12
كما فى المثال :

DEFINE POPUP monsadela FONT "",12

وأيضا يمكن إضافة اختيار آخر يجعل خط القائمة BOLD أو مائل وهذه إضافة بسيطة وهى :

STYLE 'b' &&جعله bold

و

style 'i' && جعله مائل

أو style 'bi' &&جعله ثقيل ومائل

أو جمع كل الخصائص :

DEFINE POPUP monsadela font "",12  STYLE 'bi'

وها هو ملفنا بعد الإضافة

menu.zip

السلام عليكم

جزاك الله كل خير يا مبدع

واصل ابداعك

تحياتي لك

ولهذا المنتدى و كل من ساهم في تطوير هذا المنتدى

جعل الله هذا في ميزان حسناتكم جميعا

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