delphi4arab منتديات دلفي للعرب

السلام عليكم
كيف يمكنني إظهار النقطة الخاصه لكل تلميذا في الفاست ريبوت لأن البرنامج المرفق يظهر النقطة الأولى للتلميذ الأول لجميع التلاميذ؟
وأيضا هناك رسالة خطأ عند تكرار نفس الإسم ونفس الدرس كيف أستطيع تجنبها مع العلم أني إستخدمت TRY Except

وهل هناك أي ملاحظات أستطيع تجنبها

وعليكم السلام
لم اتمكن من فتح المشروع . الفورم4

(06-09-2020, 12:02 AM)mobile كتب : [ -> ]وعليكم السلام
لم اتمكن من فتح المشروع . الفورم4

تم تحديث المرفق أرجو الإطلاع عليه والمساعدة إن أمكن
حيث هناك خطأين الأول وهو ظهور إسم الدرس والنقطة الأولى للجميع كما سبق الإشارة اليه والخطأ الثاني وهو عند إضافة نفس الإسم ونفس الدرس يظهر خطأ لم أستطع تجاوزه بـ TRY Except

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

ليس لدي Firebird لذا لا يمكنني التعليق على المشكل الأول.
لدي تعليق وهو اطالتك للاستعلام, يمكنك اختصاره كما في المثال, لتتجنب اضافة سجل اذا كان يوجد مسبقا:

PHP كود :
procedure TForm.....
Var
  SQL: String;
Begin
  SQL := 'INSERT INTO Etudiants (Nom, prenom, naissance) SELECT :nom, :prenom :naissance' +
    ' WHERE NOT EXISTS(SELECT * FROM Etudiants WHERE Nom = :nom AND prenom = :prenom AND naissance = :naissance)';

  Dmdata.qryAjou.ExecSQL(SQL, [edtNom.Text, edtprenom.Text, StrToDate(edtNaissance.Text)]);
  
  Dmdata.tblEtudiant.Refresh;
End; 

(06-09-2020, 09:20 PM)sofiane201 كتب : [ -> ]وعليكم السلام

ليس لدي Firebird لذا لا يمكنني التعليق على المشكل الأول.
لدي تعليق وهو اطالتك للاستعلام, يمكنك اختصاره كما في المثال, لتتجنب اضافة سجل اذا كان يوجد مسبقا

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

الموضوع

أظن لا يمكن الإختصار

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

ALG2009

mobile

ALG2009

sofiane201

ALG2009

ALG2009