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

[tahri]

السلام عليكم
كيف أمنع تكرار التسجيلات أي إذا كانت نفسها تضاف تلقائيا إلى بعضها في عمود واحد مع مجموع عددها 
أريد جمع الاسطر لها نفس القيم (نفس الرقم التسلسلي Rfrence) في DBgrid

مثلا في الصورة في المرفقات كيف أجمع سلعة tob  في عمود واحد فقط
جزاكم الله خيرا

[أبو معاذ]

وعليكم السلام .
هل تستعمل ال sql ؟
إذا كان نعم ،
استعمل Group BY .
إذا كان لا ، وضح أكثر.

[tahri]

وعليكم السلام .
هل تستعمل ال sql ؟
إذا كان نعم ،
استعمل Group BY .
إذا كان لا ، وضح أكثر.

لاحظ الصورة المرفقة 
أريد جمع الاسطر لها نفس القيم (نفس الرقم التسلسلي Rfrence) في DBgrid
لا أستعمل SQL
شكرا لك

[tahri]

وعليكم السلام .
هل تستعمل ال sql ؟
إذا كان نعم ،
استعمل Group BY .
إذا كان لا ، وضح أكثر.

أريد جمع الاسطر لها نفس القيم (نفس الرقم التسلسلي Rfrence) في DBgrid
كما في الصورة المرفقة

[محمد عبد العزيز]

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

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

[tahri]

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

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

أريد جمع الاسطر لها نفس القيم (نفس الرقم التسلسلي Rfrence) في DBgrid
لاحظ الصورة في الرد السابق

[wadoud]

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

[Delphi4Us]

ضع فقط جملة الـ SQL المستخدمة

مثلا انت تستخدم

كود :

Select Designation, Qte, Prix from Tablename

الحل هو شئ مثل

كود :

Select Designation, sum(Qte), sum(Prix) from Tablename groub by Designation

[tahri]

ضع فقط جملة الـ SQL المستخدمة

مثلا انت تستخدم

كود :

Select Designation, Qte, Prix from Tablename

الحل هو شئ مثل

كود :

Select Designation, sum(Qte), sum(Prix) from Tablename groub by Designation

if Key = #13 then
BEGIN
data.L_Ventes.Edit;
data.L_VentesRfrence.Value:=data.ArticlesRfrence.Value;
data.L_Ventes.Insert;
edit1.Text:='';
أريد التغيير على هذا الكود عند الضغظ على زر Entrée إذا كانت السلعة نفس Rfrence تجمع مع بعضها

[Delphi4Us]

data.L_Ventes.Edit;
data.L_VentesRfrence.Value := data.ArticlesRfrence.Value;
data.L_Ventes.Insert;
edit1.Text:='';

مشكلتك عويصة فكودك هذا لاعلاقة له بموضوع جمع النتائج وانما بتعديل واضافة البيانات
وحتى تعديل واضافة البيانات هو خاطئ 

يعني انت تتحدث عن عرض البيانات وتضع كود لاهو معروف للاضافة او التعديل
على العموم اذا كان الموضوع عرض البيانات فهو كما اشرت لك والحل بجملة الاستعلام
واذا كنت تقصد انك تريد اضافة البيانات بسجل بقاعدة البيانات فالحل اما بجملة استعلام Update بدل من Insert بحال كانت السلعة موجودة
او باستخدام الدالة For على الجدول ومقارنة اسم السلعة فلو كانت موجودة يقوم بعمل Edit واذا كانت غير موجودة يقوم بعمل Insert 
واذا كنت تريد كود جاهز فليس بدون ان ترفق اسم الجدول والحقول التي تستخدمها