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

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

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

هذا تعديل للفورم الاول

أتمنى أن تري الاكواد في المفاتيح

ولكن نسيت التأكد من البحث

سأتأكد منه ومن المرفق الجديد وأعدله إن شاء الله

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

new.zip

تم تعديل هذه المشاركة بواسطة طلال بلال في 19 يناير 2009 في 03:32

1
#77

هذا المرفق بعد التعديل الاخير ولكن هناك بعض الملاحظات

لقد وضعت في زر الخروج الكود

form1.Show;
form8.Hide;

وهذا خطأ حاولي إغلاقه لتعرفي السبب

يكفي ان نكتب

close;

ثم ضعي الجداول في data module وليس على الفورم لآنك ستحتاجي إلى إغلاق الجداول وعدم فتحها إلا عند الضرورة من أجل أن لاتأخذ حجم كبير في الذاكرة

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

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

بانتظار ملاحظات الاخ علي

بالتوفيق

new1.zip

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

1
#78

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

بقي هذه الصورة لم افهم ماالمقصود منها

post-169385-1232356971_thumb.jpg

بقي التأكد وملاحظات الاخ علي

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

تم تعديل هذه المشاركة بواسطة طلال بلال في 19 يناير 2009 في 12:24

1
#79

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

الصورة التي وضعتها اخي طلال هي استعلام للبحث بثلاث حقول دفعة واحدة

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

العمل ممتاز ولا ملاحظات على الاطلاق ونفس الطريقة المعتادة

اخ طلال هل حلت مشكلة اللغة عندك وهل حملت الملف الذي ارسلته لك ام لا

وفقنا الله واياكم

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

#80

شكرا أخي علي نعم حلت المشكله والف شكر

بانتظار الاخت هبة من أجل المرحلة الثانية

#81

انا اسفة على تاخري فلقد كنت في الجامعة

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

سارى ماذا فعلتم حتى الحق بكم

تم تعديل هذه المشاركة بواسطة hbate_allah في 19 يناير 2009 في 22:04

#82

لقد رايت المرفق

وهو يعمل بطريقة جيدة

حتى فكرة عرض قائمة الطلبة بتلك الطريقة عملية جدا و بسيطة

انا كنت ساعملها ب QReport الذي يسمح لي بكتابة المقدمات المعروفة كاسم المؤسسة و ما الى ذلك

حتى الطباعة

لكن هذه ايضا جيدة

ما هي المرحلة الثانية هل ستكون عملية حساب المعدل ام اظهار التوزيع الزمني لكل مادة ام قائمة الغيابات التي هناك طريقتان لانجازها

1-اما حسب المادة اي تكون لدينا قائمة الطلبة المسجلين في السنة الدراسية التي تدرس بها المادة و عدد الغيابات لكل طالب في شهر معين

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

ما رايكم اي طريقة نختار حتى ابدا العمل

على فكرة لانجاز التوزيع الزمني هناك طريقتان ايضا

1- هو ان نفتحه عن طريق ملف وورد موجود مسبقا

2-او ان يكون هناك جدول نكتب فيه الساعات و الايام كل معلومة في توزيع الزمن

ارى ان الطريقة الاولى احسن

#83

اختي هبة الله QReport مخصص للطباعة وليس للبحث

اما بشان الطباعة فسنطبع القائمة كما تريدين انتي ويريد مستعمل البرنامج

الى جدول الغيابات

تم تعديل هذه المشاركة بواسطة علي .ع في 19 يناير 2009 في 22:38

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

#84

ما رايكم انتم

حتى ابدا العمل من الان

تم تعديل هذه المشاركة بواسطة hbate_allah في 19 يناير 2009 في 22:45

#85

أعتقد أن الطريقة الثانية أفضل من ملف وورد

ولكن اختاري اللذي يناسبك , والافضل أن يقرر الاخ علي لأن خبرته كبيرة بهكذا برامج .

تم تعديل هذه المشاركة بواسطة طلال بلال في 19 يناير 2009 في 22:55

1
#86
اقتباس
ختي هبة الله QReport مخصص للطباعة وليس للبحث

كنت احسب انه يفيدنا في اظهار القوائم فقط

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

ولكن اختاري اللذي يناسبك , والافضل أن يقرر الاخ علي لأن خبرته كبيرة

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

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

اما الطريقة الثانية فيكون هناك الكثير من الحقول

لكن كما قلت الراي الاخير للاخ علي فلديه خبرة اكثر منا

#87
اقتباس
// Groupe F_code Anne_scolaire

DM.QListE.Close ;

DM.DEtud.DataSet := DM.QListE ;

DM.QListE.ParamByName( 'fil') .Value := edit2.text ;

DM.QListE.ParamByName( 'gro') .Value := edit3.text ;

DM.QListE.ParamByName( 'ans') .Value := edit4.text ;

DM.QListE.Open ;

end;

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

فهنيئا لك

اقتباس
ثم ضعي الجداول في data module وليس على الفورم لآنك ستحتاجي إلى إغلاق الجداول وعدم فتحها إلا عند الضرورة من أجل أن لاتأخذ حجم كبير في الذاكرة

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

#88
اقتباس
ولكن اختاري اللذي يناسبك , والافضل أن يقرر الاخ علي لأن خبرته كبيرة بهكذا برامج

اخي طلال لا خبرة ولاشي المهم ان تفكر بشكل سليم وانا لا ادعي الخبرة -_-

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

فهنيئا لك

ستطبقين ما هو احسن من ذلك

الان الى جدول الغيابات ودعونا من التوزيع الزمني لوقت لاحق

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

#89

حاضر لكن باي طريقة هل على حسب المادة ام الطالب

تم تعديل هذه المشاركة بواسطة hbate_allah في 19 يناير 2009 في 23:20

#90

طبعا على حساب الطالب

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

#91

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

اذا ادخلنا اسم المادة يظهر لنا غيابات الطلبة في هذه المادة لكن

[

]if edit1.Text <>''then
begin
case RadioGroup1.ItemIndex of
0:
  begin
  if not DM.Dabsence.Locate('Numero_inscription',Edit1.Text,[])then
  begin
  Showmessage('رقم التسجيل غير موجود ');
  edit1.SetFocus;
  end;
  end;
2:
  begin
  if not DM.Dabsence.Locate('M_code',Edit1.Text,[])then
  begin
  ShowMessage('هذه المادة لم تسجل فيها الغيابات بعد ');
  edit1.SetFocus;
  end;
  end;
 end;
  end
  else
  begin
  ShowMessage('خلية البحث فارغة');
  edit1.SetFocus;
  end;
end;

لكن لم يقبل لي Locate

هل لانني في جدول الغيابات ليس هناك مفتاح index

post-178832-1232401219_thumb.gif

#92

انجزت الفورم الخاص بالغيابات

ارجو منكم المحاولة في اضافة الكود

post-112245-1232401745_thumb.jpg

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

#93

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

#94

لقد عرفت على ما اظن الخطا

لقد كتبت Dabsence و كان من اللازم كتابة DTabsence اي الجدول

#95

وانا اظن العكس هنا سنايد اليوم الذي غاب في الطالب والشهر

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

اقترح حذف الحقل عدد الغيابات لاننا سنحصل عليه حسابيا طبعا مع تغيير النموذج قليلا

تحياتي

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

#96

من ناحية صيصبح مميز انا معك في هذا سيزداد حجم العمل لا ؟

مازال لدي خطا انه لا يقبل لي Locate

لقد لاحظت ايضا ان الجداول التي ليس لها index تكتب .db و الاخرى .DB

هل لهذا معنى مع العلم اننا لا نستطيع ان نجعل لهذا الجدول index فتفس الطالب يمكن ان نجده اكثر من مرة

ونفس المادة نجدها اكثر من مرة ما العمل

#97

يرجى اضافة index الى جدول الغيابات وليكن رقم التسجيل

اما عن التعليمة Locate فلا علاقة لها بال index

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

#98

لكن كيف يكون index

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

تم تعديل هذه المشاركة بواسطة hbate_allah في 20 يناير 2009 في 01:30

#99

اليس هناك حل اخر لمشكلةindex غير اختيار رقم التسجيل

#100

يبدو انك لم تفهمي قصدي

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

اما رقم التسجيل الطالب يجب ان يكون مرتبط بجدول الغياب

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

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

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