delphi4arab منتديات دلفي للعرب
مشروع صغير لحساب الاجر الصافي للاجير - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : مشروع صغير لحساب الاجر الصافي للاجير (/showthread.php?tid=9131)



مشروع صغير لحساب الاجر الصافي للاجير - fouad - 24-01-2018

السلام عليكم ورحمة الله تعالى وبركاته
لقد قمت ببرمجة برنامج يقوم بحساب الاجر الشهري الصافي للاجير (سائق شاحنة يبيع بالجملة ) 
وطلب مني ان اقوم بتسهيل عملية حساب هذا الاجر بناء على عدة عوامل 
1- اولا : حساب العمولة بناء على :  نوع البائع + نوعية السلعة + الكمية التي باعها
2-ثانيا : خصم الايام التي لم يعملها الاجير من راتبه 
ولكنني لم استطع اكمال المشروع نظرا لصعوبة التعامل مع قاعدة البيانات Absolute database
 لقد استعملت نسخة delphi xe6 + مكونات Ehlib
 رابط المشروع

https://drive.google.com/open?id=1bugRmsURELjLA4bESdzKC4dY1SNF4mSh


RE: مشروع صغير لحساب الاجر الصافي للاجير - محمد عبد العزيز - 24-01-2018

وعليكم السلام ورحمة الله وبركاته
حدد سؤال واحد، واضح، ما المشكل بالضبط ؟ حتى يمكن الاجابة عليك



RE: مشروع صغير لحساب الاجر الصافي للاجير - h-farid - 24-01-2018

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

أخي إذا كان قصدك هو مشاركة البرنامج فقط, فأظن ان القسم غير مناسب لمشاركته. أما إن كنت تطرح سؤالا فـكما أخبرك به الأستاذ عبد العزيز العزيز.


RE: مشروع صغير لحساب الاجر الصافي للاجير - fouad - 25-01-2018

السلام عليكم

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

وايضا اريذ استعمال احد المتغيرات او المكونات كالتكست ادت مثلا داخل الاستعلام 


بارك الله فيكم


RE: مشروع صغير لحساب الاجر الصافي للاجير - Mr.DOS - 26-01-2018

السلام عليكم
المشكلة ليست في نوع قاعدة البيانات سواء Absolute database او غيرها ... لان لغة sql متوافقة مع الجميع
مثال 1 : بحث او فلترة بإستعمال Tedit + SQL

كود :
Uquery.close; Uquery.sql.clear; Uquery.sql.text:=' SELECT Field1,Field2.... FROM UtableName WHERE Rfield Like '''+Tedit.text+'%''  '; Uquery.open;

لجعل Tedit معينة تأخد متغير ما من ناتج فلترة او عملية حسابية ناتجة عن استعلام ما
عليك بعمل الاستعلام في وضع   التصميم + وسحب الحقل على الفورم
او برمجيا ...
كود :
Uquery.close; Uquery.sql.clear; Uquery.sql.text:=' SELECT (sum(Field1)*8)/30 FROM UtableName '; Uquery.open; ViewEdit.text:=(Uquery.fieldbyName('Field1').value);



RE: مشروع صغير لحساب الاجر الصافي للاجير - fouad - 26-01-2018

وعليكم السلام بارك الله فيك يا اخي على المساعدة

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

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

بالنسبة للفلترة فقد نجحت في العمل

اما بالنسبة للكيري فلم تعمل

وعليكم السلام بارك الله فيك يا اخي على المساعدة

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

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



بالنسبة للفلترة فقد نجحت في العمل

اما بالنسبة للكيري فلم تعمل


RE: مشروع صغير لحساب الاجر الصافي للاجير - fouad - 26-01-2018

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

شكرا على المساعدة بارك الله فيكم يا اخواني mr dos B.M.AbdelAziZ h farid