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

برنامج تسيير مؤسسة تربوية

رائج
بدأه hbate_allah في 17 يناير 2009 · 717 رد · 52,020 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#676

يبدو انني نسيت حذف الملف التنفيذي

تم التعديل

اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا

#677

بســم الله الـرحمــن الرحيــم

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

هذه محاولة لم تكتمل لكن لويصل الفكرة اليكم

خطوات العمل

بقوم المستعمل باضافة المعلومات اللزمة و الموضحة في الفورم لكي ينشأ التوزيع الزمني للأسبوع كامل 1-

2- يقوم بالضغط على الزر لمشاهدة النتيجة في شكل جميل

3- نقوم بفلترة المعلومات حسب القسم و الفوج و نرتبها حسب الايام ثم الساعات .

نتحصل على جدول يخص الثسم و الفوج في الاسبوع نقوم بفلترة 2 حسب اليوم السبث مثلا ثم ننقل المعلومات الى اتلفورم الاخرى.

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

الهدف الاول هو عرض المعلومات

المرحلة 2 هي تسهبل المستعمل عمليت ادخال البيانات

 


procedure TForm15[color= #339933;].SpeedButton1Click[color= #009900;](Sender[color= #339933;]: TObject[color= #009900;])[color= #339933;];

[color= #000000; font-weight: bold;]var

vC_code [color= #339933;]: integer[color= #339933;];

vGroup[color= #339933;]:string[color= #339933;];

begin

     vC_code[color= #339933;]:= dm[color= #339933;].TClasseC_code[color= #339933;].Value[color= #339933;];

     vGroup[color= #339933;]:=  dm[color= #339933;].TSheureGroupe[color= #339933;].Value[color= #339933;];

     Query1[color= #339933;].Close[color= #339933;];

     Query1[color= #339933;].SQL[color= #339933;].Text[color= #339933;]:=format[color= #009900;]([color= #0000ff;]'SELECT * FROM SHeure WHERE C_code= %d AND Groupe= '[color= #0000ff;]'%s'[color= #0000ff;]' ORDER BY
 %s'[color= #339933;],[color= #009900;][vC_code[color= #339933;],vGroup[color= #339933;],[color= #0000ff;]'Jour,Heure'[color= #009900;]][color= #009900;])[color= #339933;];

     Query1[color= #339933;].Open[color= #339933;];

     ImputSheureData[color= #009900;]([color= #009900;])[color= #339933;];[color= #666666; font-style: italic;]//  لشحن المعلومات في الواجهة الاخري جاري برمجتها

     form16[color= #339933;].ShowModal[color= #339933;];

[color= #990000;]end[color= #339933;];

*****************************

ياذهب الئ السوق الان ارجوا ان اجد محاولتكم في عودتي ان شاء الله

gest_s_v10.rar

post-1034-1233399544.jpg

post-1034-1233399994.jpg

تم تعديل هذه المشاركة بواسطة زكيري عبد العالي في 31 يناير 2009 في 14:14

#678

هدا الكود ارجوا مشاركتكم

 

PROCEDURE TForm15[color= #339933;].ImputSHeureData[color= #009900;]([color= #009900;])[color= #339933;];

[color= #000000; font-weight: bold;]VAR vCol[color= #339933;],vRow[color= #339933;],vjour[color= #339933;]:integer[color= #339933;];

BEGIN

   StringGrid1[color= #339933;].ColCount[color= #339933;]:= Query1[color= #339933;].RecordCount[color= #339933;];

   StringGrid1[color= #339933;].RowCount[color= #339933;]:=[color= #cc66cc;]15[color= #339933;];

   vjour[color= #339933;]:=[color= #cc66cc;]1[color= #339933;];

   vRow[color= #339933;]:=[color= #cc66cc;]1[color= #339933;];

   [color= #b1b100;]while vRow [color= #339933;]< [color= #cc66cc;]5 [color= #b1b100;]DO

   BEGIN

      Query1[color= #339933;].Filtered[color= #339933;]:=[color= #000000; font-weight: bold;]true[color= #339933;];

      Query1[color= #339933;].Filter[color= #339933;]:=[color= #0000ff;]'jour='[color= #339933;]+inttostr[color= #009900;](vjour[color= #009900;])[color= #339933;];

      WITH StringGrid1 [color= #b1b100;]DO

      BEGIN

          [color= #b1b100;]FOR vCol [color= #339933;]:=[color= #cc66cc;]0 TO  Query1[color= #339933;].RecordCount[color= #cc66cc;]-1 [color= #b1b100;]DO

          BEGIN

               Query1[color= #339933;].RecNo[color= #339933;]:=vCol[color= #cc66cc;]+1[color= #339933;];

               Cells[color= #009900;][vCol[color= #339933;],[color= #cc66cc;]0[color= #009900;]][color= #339933;]:= Query1Heure[color= #339933;].Value[color= #339933;];

               Cells[color= #009900;][vCol[color= #339933;],vRow[color= #009900;]][color= #339933;]:= Query1Salle[color= #339933;].Value[color= #339933;];

               Cells[color= #009900;][vCol[color= #339933;],vRow[color= #cc66cc;]+1[color= #009900;]][color= #339933;]:= Query1P_code[color= #339933;].Value[color= #339933;];

               Cells[color= #009900;][vCol[color= #339933;],vRow[color= #cc66cc;]+2[color= #009900;]][color= #339933;]:= Query1M_code[color= #339933;].Value[color= #339933;];

          [color= #990000;]END[color= #339933;];

          vRow[color= #339933;]:=vRow[color= #cc66cc;]+3[color= #339933;];

      [color= #990000;]END[color= #339933;];

      inc[color= #009900;](vjour[color= #009900;])[color= #339933;];

   [color= #990000;]END[color= #339933;];

[color= #990000;]END[color= #339933;];

ليس عندي الوقت الكافي لاكمال

gest_s_v11.rar

تم تعديل هذه المشاركة بواسطة زكيري عبد العالي في 31 يناير 2009 في 18:13

#679

السلام عليكم

اعرف انني متاخرة الان فقط رجعت النت

سارى ما فاتني

اقتباس
سال ضروري يسهل البرمجة هل الساعات ثابتة

اي داءما في التوزيع نجد مثلا

8:00

9:30

11:00

12:30

.....

ارجوا ان توضحي هده النقطة اختنا هبة

في رايي ان الساعات ثابتة لكن هي تكون بالطريقة الاتية

8-9.30

9.40-11.10

11.20-12.50

13.10-14.40

14.50-16.20

16.30-18

في رايي انها لا تتغير ابدا

#680

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

ارجوا ان تجريبوا الكود وذللك باضافة تسجيلات مختلفة .

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

#681

السلام عليكم

هذا تعديل يشمل جدول الغيابات فقد لاحظت اننا لم نؤيد الحركة الدورية وعدم السماح للإدخالات الخاطئة

وقد أضفت له مفتاح جديد للتراجع

ارجو أن تتأكدوا إن كانت الطريقة مناسبة

سأحاول الان أن أفهم المطلوب من جداول الاخ ذكيري

gest_s_v11.zip

#682

هذه محاولة في تقرير الطلبة

عملتها البارحة و لان النت انقطعت لم استطع بعثها

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

gest_s_v7.rar

#683

المطلوب ايضا

1- اضافة عمليات على الاقسام حتى ولو كانت في واجهة الشعلة المهم اضافة قسم حذف تغيير .

2- اضافة حقل القسم في واجهة الطالب لان كل طالب ينتمي الى قسم .

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

#684
اقتباس
- اضافة حقل القسم في واجهة الطالب لان كل طالب ينتمي الى قسم .

هذا الحق موجود انه Année_scolaire

اظن انني لم احسن اختيار الاسم فقط

#685

اما عن اضافة قسم اظن انه ليس لها فائدة

ودذلك لانه مثلا بالنسبة لشعبة المهندس سنولتها محددة ب 5 سنوات لا نقصان و لا زيادة

#686

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

على العموم اتخذته في الحسبان و عملة عليه يمكنك بعدها ان تحذفيه مع التعديل في الكود و في MCD

لقد عدلة بعض الاشاء البسيطة لكن هل من احد جرب الكود السابق .

مار ايكم اخوتي في فكرتي اراها ناجحة او انا مخطأ :mellow:

gest_s_v12_az.rar

تم تعديل هذه المشاركة بواسطة زكيري عبد العالي في 31 يناير 2009 في 20:13

#687

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

اظن انه علينا جمع اجزاء المشروع ارى ان بعض المرفقات لا تحميل التعديلات التي نقوم بها

الرجاء تحميل المرفق الاخير لكل عملية

اضافة كلمة المرور والواجهة

اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا

#688

هذه مهمتك اخ على فمثلا الصباح بدات في المشرةع رقم 9 و عندما غيرته وجد الاخ طلال اضاف 12 و الاخ هب اضافى اخر .

و الان اترككم في رعاية الله .بالتوفيق

#689
اقتباس
جب تحديد القسم و الان ليس له فاءدة اوضحي جزاكي الله خير

لا فائدة لاضافة قسم و حذف قسم

لقد استعملت مصطلح القسم مثلا نقول هذا طالب في السنة الثانية اي

القسم=السنة الثانية

#690
اقتباس
هذه مهمتك اخ على فمثلا الصباح بدات في المشرةع رقم 9 و عندما غيرته وجد الاخ طلال اضاف 12 و الاخ هب اضافى اخر .

المهم ان نسعى كلنا لضم المشروع الي بعضه

اقتباس
و الان اترككم في رعاية الله .بالتوفيق

وين رايح يا حبيبي مازال الحال

اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا

#691

ما اخبار المشروع معك اخت هبة الله

اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا

#692
اقتباس
ما اخبار المشروع معك اخت هبة الله

لقد فهمت ان شاء الله كيف يعمل

عندما بدات تخيلته صغير لكنه الان كامل بمعنى الكلمة

لقد اجل وضعه الى يوم الثلاثاء كما قلت و احتمال الى 12 فيفري

-----------------------------------------

هذا الاسبوع كل يوم يجب ان الق بحث انا جد متعبة

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

#693

مالذي بقي لنا الان

اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا

#694

:Dمالذي بقي لنا الان استاذنا يسال .

احببت ان اشارك معكم لكن للاسف سابدا تربص جديد في c# ولا بد ان احظر نفسي لمسابقة الدخول .

شكرا على العمل الجيد كل الاخوة .

&&&&&&&&&&&&&&&&&&&&&&&&&&&

من جهازك ياعلا الم اقلك اغلق logmin والا :evil:

تريد الفوز إضغط هنا

اشِهِدي يَا سَمَـا وَاكْتُبَنْ يا وُجـودْ

إنَّـنَـا للِحـمَـا سَنَكُونُ الجُـنُـودْ

فـنَـزيحْ البَـلاَ وَنَـفُـكُّ الْقُيُـودْ

ونَنيلُ الـرِّضـا مِنْ وَفَّى بِالعْهُـودِ

الشيخ عبد الحميد ابن باديس

#695
اقتباس
مالذي بقي لنا الان استاذنا يسال

اعتقد ان ما تبقى هو توزيع الزمن وبعض الرتوشات

اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا

#696

توزيع الومن جاهزة ولم يبقا فيها الا بعض الرتوشات

#697
زكيري عبد العالي كتب:
فمثلا الصباح بدات في المشرةع رقم 9 و عندما غيرته وجد الاخ طلال اضاف 12 و الاخ هب اضافى اخر .

انك تظلمني أخي ذكيري انا تقيدت بالارقام

أم لأنني لم اوافق الاخ محمد على الدعوة التي سيرفعها ضدك ..؟؟؟؟؟؟

#698

اخي طلال الم اقل لك إن هذا الشخص الذي يدعى سي عبد العالي ثعلوب هي يدي في يدك ونعلنها داحس والغبراء

عزيزي :

لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .

فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم

*****

2_header.png

#699
اقتباس
انك تظلمني أخي ذكيري انا تقيدت بالارقام

لم تفهم قصدي يعني انك صنعت 10 و 11 و 12 انا مازلت في 10 معذرة ياأخي طلال .

اما انت يا استاذ موح : فعلا لقد ورطتك في المشروع لكن لولا فكرة لما قمنا بفتح الموضوع و الان تري كم احد يرد و يقرأ في موضوعك .

بالتوفيق

---------------------------------------------------------------------------------------

من استطاع ان يجمع كل التغيرات في مشروع واحد ارجوا ان يضع الرابطة لم يبفي الكثير . ويكون هو المرجع .

#700

السلام عليكم

أريد توضيح :

بالنسبة لتوزيع الزمن

عند عرض التوزيع الزمني لشعبة ما لفوج معين فإنه يظهر ساعات الد راسة فقط ولا يظهر ساعات عدم الدراسة أي مثلا يوم السبت بين الساعة10:30 و11:30 لا توجد هناك دراسة فعند عرض الجدول ينتج لنا لصق العمود الساعة 08:30و9:30عمود الساعة 11:30و12:30ولا يظهر عمود الساعة 10:30 و11:30 {هذه غير سهلة الإستعمال للمستعمل}

تم تعديل هذه المشاركة بواسطة zekiri abdelali في 1 فبراير 2009 في 14:52

تريد الفوز إضغط هنا

اشِهِدي يَا سَمَـا وَاكْتُبَنْ يا وُجـودْ

إنَّـنَـا للِحـمَـا سَنَكُونُ الجُـنُـودْ

فـنَـزيحْ البَـلاَ وَنَـفُـكُّ الْقُيُـودْ

ونَنيلُ الـرِّضـا مِنْ وَفَّى بِالعْهُـودِ

الشيخ عبد الحميد ابن باديس

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