شكراً تم حل المشكلة في المفق مثال كامل ليستفيد منه بقية الأعضاء ، بارك الله فيكم و صحا فطوركم
فعلا كما قال اخونا MShRaul
هده الطريقة تعتمد على انشاء index ولكن مؤقت
علما انه هناك عدة طرق لانشاء index
مثال على هده التعليمة
AdoTable1.Sort := 'HireDate DESC,EmpNo ASC'
يمكنك فرز عدة حقول وتعمل مثل Order By
يفظل استخدم سكل لما فيها من مزايا عدة