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

برنامج لا استطيع تنفيذة

بدأه xcode في 20 أبريل 2012 · 17 رد · 1,330 مشاهدة · في قواعد بيانات Visual FoxPro
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

]الاخوة الاعزاء اعضاء المنتدي

لقد قمت باعداد برنامج لادارة احد المطاعم و استخدمت Tree لتقسيم الاطعمة التي يقدمها المطعم و لكن بعد الانتهاء من البرنامج طلب مني العميل ان تكون القائمة علي شكل مجموعة من command button مع امكانية الاضافة و التعديل و الخذف علي هذة القائمة مرسل لكم الشكل الحالي للقائمة و الشكل المقترح .

شكرا مقدما علي المساعدة.

post-237280-087804700 1334917454_thumb.p

post-237280-030678700 1334917466_thumb.p

المرفقات
Untitled.pngUntitled1.png

Persistent Fox

#2

السلام عليكم

جرب هذا الموضوع

بقليل من التعديلات تستطيع الوصول لما تريده

وبكثير من التعديلات - حسب همتك - تحصل على شاشة POS مثالية

مع التحية

أستغفر الله العظيم و أتوب إليه

#3
Shadowz كتب:

السلام عليكم

جرب هذا الموضوع

بقليل من التعديلات تستطيع الوصول لما تريده

وبكثير من التعديلات - حسب همتك - تحصل على شاشة POS مثالية

مع التحية

الاخ العزيز shadwoz اولا الف شكر علي ردك الكريم و السريع :) . بس المشكلة ال اتا بواجها هيا كيفية اضافة command button جديد لصنف جديد في run time مع الحفاظ علي هذه command button عند تنفيذ البرنامج مرة اخري في اي وقت هيا الفكرة في دماغي بس مش عارف انفذها علي ارض الواقع هيا ببساطة هيكون في table يحتوي علي المجموعات الرئيسية و جدول اخر يحتوي علي الاصناف و عند اضافة اي مجموعة او صنف يتم عمل command button بشكل تلقائي و يكون CAPTION الخاص بهذا command bottun هوا اسم المجموعة او الصنف و عند الضغط علي اي command bottun يضع المعلومات الخاصة بهذا الصنف في grid .

Persistent Fox

#4

السلام عليكم

ستجد بالتعديل المرفق طريقة التنقل بين الأصناف المعروضة

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

بناءاً على رقم مجموعة معينة

قد تطبق نفس الفكرة لعرض المجموعات، أو تستخدم ComboBox لذلك

bind.rar

أستغفر الله العظيم و أتوب إليه

#5
Shadowz كتب:

السلام عليكم

ستجد بالتعديل المرفق طريقة التنقل بين الأصناف المعروضة

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

بناءاً على رقم مجموعة معينة

قد تطبق نفس الفكرة لعرض المجموعات، أو تستخدم ComboBox لذلك

bind.rar

يا اخ Shadowz شاكرين مهللين انا هجرب الطريقة المقترحة وان شاء الله لو وصلت لنتيجة هاشاركها معاك و مع الاعضاء ممكن تفيد حد تاني. زادك الله علما ونفعا للاخرين

Persistent Fox

#6

لسلام عليكم

اخي العزيز xcode

موضوع جميل جداً وانا احب مثل هذة المواضيع الذي تعمل لك تحريك في العمل وتبادل المعلومات والطرق

وشكرا جزيلا للخ عبد الله الذي يتابع معنا المنتدى

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

بالحقيقة فكرة الاخ شادو جميله جداً واتمنى فهم حركاتها

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

لاني اعتمد طريقة اعطاء الفكرة لغرض اظهار المهارات المختلفة لكي يستفاد الجميع

المثال المرفق هو عبارة عن استخدام وظائف الوندوز في الفيجوال فوكس برو وكثيراً مااستخدمها

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

تحياتي للجميع واتمنى اني لم اطل الكلام

add.zip

#7

واتمنى من الجميع المشاركة معنا

لانة موضوع جيد جداً

لغرض التركيز به

تحياتي والى الملتقى بعد الاثنين ان شاء الله

مع الف التحية لكم اخوتي

#8
lion iraq كتب:

واتمنى من الجميع المشاركة معنا

لانة موضوع جيد جداً

لغرض التركيز به

تحياتي والى الملتقى بعد الاثنين ان شاء الله

مع الف التحية لكم اخوتي

شكرا علي المشاركة يا اخ lion فكرتك في منتهي الروعه انا هاحاول ادمجها مع فكرة الاخ shadowz .

بصراحة انا في منتهي السعادة ان في ناس عندها الافكار و الخبرات الهايلة دية الف شكر ليكم انا شغال دلوقتي باستخدام طريقة الاخ shadwoz و الحمدللة الموضوع ماشي كويس اول ما اوصل لنتيجة مرضية سوف ارسل لكم النتائج :).

Persistent Fox

#9

:)

مبدعين حقاً ... امثلة رائعة جدا بارك الله فيكم

632675481.jpg
#10
moonlight10 كتب:

:)

مبدعين حقاً ... امثلة رائعة جدا بارك الله فيكم

الاخ shadwoz و lion انا خلصت الجزء الخاص بالمجموعات برجاء المراجعة و ابداء الراي واذا كان هناك اي ملاحظات لتسهيل اضافة الاصناف برجاء الافادة

group.rar

xcode كتب:

الاخ shadwoz و lion انا خلصت الجزء الخاص بالمجموعات برجاء المراجعة و ابداء الراي واذا كان هناك اي ملاحظات لتسهيل اضافة الاصناف برجاء الافادة

group.rar

Persistent Fox

#11

السلام عليكم

العفو xCode وفراس و Moon

xCode

تم وضع النموذج ضمن Project

تم عمل قاعدة بيانات ووضع جدول المجموعات فيها واضافة جدول للأصناف

أما ما تبقى من عمل / أعمال فهو 100% عليك :)

POS.rar

أستغفر الله العظيم و أتوب إليه

#12
xcode كتب:

الاخ shadwoz و lion انا خلصت الجزء الخاص بالمجموعات برجاء المراجعة و ابداء الراي واذا كان هناك اي ملاحظات لتسهيل اضافة الاصناف برجاء الافادة

group.rar

السيد الدكتور shadowz للاسف form لا تعمل في مشكلة في code الاتي

SELECT * FROM crsSource WHERE crsSource.GID=oSource.GroupID INTO cursor crsItems

post-237280-003436800 1335142512_thumb.p

المرفقات
Untitled.png

Persistent Fox

#13
xcode كتب:

السيد الدكتور shadowz للاسف form لا تعمل في مشكلة في code الاتي

SELECT * FROM crsSource WHERE crsSource.GID=oSource.GroupID INTO cursor crsItems

السام عليكم اخوتي

الحمد لله رجعت بالسلامة

ولو انا مرهق قليلا

ولكن يشعرني بالاتياح عندما رايت النشاط

شكرا لجميع الاعضاء وخاصتاً للاخ عبد الله

وعلى الردود الجميله

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

اخي xcode

الرسالة الظاهر يمكن تفاديها بلصق الكود الاتي بمكان load الفورم اي استبدلها وهو نفس الكود ولكن تعديل بسيط

IF NOT USED("Groups")
	USE Groups SHARED IN 0
ENDIF
IF NOT USED("Items")
	USE Items SHARED IN 0
ENDIF

SELECT * FROM Groups INTO CURSOR crsGroups
SELECT * FROM Items INTO table crsSource
USE crsSource SHARED
SELECT * FROM crsSource WHERE crsSource.GID=NVL(crsGroups.G_ID,0) INTO CURSOR crsItems

CREATE CURSOR TmpInvoice (ItemName c(20), uPrice N(20,3), ITEMID i(4))

USE IN Groups
USE IN Items

بعد الاذن الاخ عبدالله

واليك تعديل بسيط على نموذج السايق group

ولكن بطريقة ثانية اكمل ارقام المجموعات في جدول الاصناف لاني لم ادرجها كلها ولكن عكلت مثال لاول ثلاث مجاميع

تحياتي للجميع

كروب.zip

#14
xcode كتب:

السيد الدكتور shadowz للاسف form لا تعمل في مشكلة في code الاتي

SELECT * FROM crsSource WHERE crsSource.GID=oSource.GroupID INTO cursor crsItems

لا أدري كيف لم تظهر لي هذه المشكلة عند تجهيز النموذج

على كل حال ضع في نهاية الجملة كلمة Readwrite

أو خذ هذا التعديل الذي وضعت فيه Order By

لتصبح على النحو التالي

SELECT * FROM Items INTO CURSOR crsSource ORDER BY GID READWRITE

سلامات يا فراس..

الفكرة من موضوع الـ Cursors ( والابتعاد عن جعل الجداول الأصلية مفتوحة )

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

فللمزيد من الحرص على الجداول من أي خلل، نأخذ منها ما نريد عند بداية تشغيل النموذج وننتهي فورا منها.

أستغفر الله العظيم و أتوب إليه

#15

شكرا اخي عبدالله

وبارك الله في جهودك في المنتدى

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

ويبقى لكل شخص طريقة يفضلها

اتمنى وصول الافكار والطرق للجميع

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

تحياتي للجميع

#16
lion iraq كتب:

شكرا اخي عبدالله

وبارك الله في جهودك في المنتدى

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

ويبقى لكل شخص طريقة يفضلها

اتمنى وصول الافكار والطرق للجميع

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

تحياتي للجميع

الف شكر لكم جميعا علي المشاركات و التوضيحات الرائعة اعتقد اننا وصلنا الان الي نقطة جيدة تصلح كبداية لأي عضو يريد تصميم مثل هذة النماذج واتمني ان نلتقي جميعا في موضوع جديد ان شاء الله :)

Persistent Fox

#17

العفو يا فراس ويا xcode واهلا وسهلا بكم

بالتوفيق ان شاء الله

أستغفر الله العظيم و أتوب إليه

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