كيف ادراج اسماء الزبائن في مكون combobox دون تكرار الاسم

[Najy Ibraheem]

السلام عليكم...

للحصول على قائمة بالأسماء دون تكرار تحتاج إلى استعمال المكون Query (أو ADOQuery) مع جملة SQL كالتالي:

كود :

SELECT DISTINCT CustName FROM Customers

لاحظ وجود كلمة DISTINCT التي تمنع التكرار. الجملة السابقة ضعها في الخاصية SQL للـ Query أثناء التصميم، أو بالكود:

كود :

// احذف السطرين التاليين إذا كتبت الجملة أثناء التصميم Query1.Close; Query1.SQL.Text := 'SELECT DISTINCT CustName FROM Customers'; // ======================================== Query1.Open while not Query1.Eof do begin ComboBox1.Items.Add(Query1.FieldByName('CustName').AsString); Query1.Next; end; Query1.Close;

و يمكنك إضافة عبارة ORDER BY لجملة SELECT لترتيب الأسماء:

كود :

SELECT DISTINCT CustName FROM Customers ORDER BY CustName

نرجو الاستفادة و السلام.