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

نسخة كاملة : بماذا أعوض table1.findkey في adotable1 ؟
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

بدأت بالعمل بالـ ADO بدلا من الـ BDE و لكن وجدت مشكل في findkey لأنها لا تعمل مع adotable
و سؤالي بماذا أعوض table1.findkey في adotable1 ؟
وعليكم السلام

يمكنك استخدام Locate

وهذا مثال بسيط من Embarcadero

كود :
with CustTable do Locate('Company;Contact;Phone', VarArrayOf(['Sight Diver','P']), loPartialKey);
المثال الأول للبحث في اكثر من حقل

وهذا مثال للبحث في حقل واحد فقط
كود :
if CustTable.Locate('Company',Edit1.text,[]) then

يمكنك الاطلاع على شرح مفصل هنا