ما هو بديل ل set keyوfind key في adotable

[mohaa]

السلام عليكم يااخي لدي هذا الكود بtable ابحث عن كيفية استخدامه بواسطة adotable
table3.first ;//table de ligne vent qui contient la quantite vendu
while not(table3.eof) do
begin
Table4.setkey ; // préparation de la recherche,table4 est la table de produit stock
Table4.fieldbyname(‘reference’).asinteger := Table3.fieldbyname(‘ref_prod’).asinteger ;/ /reference est le code de produit
If table4.gotokey then
Begin
Table4.edit; //préparation de la modification
Table4.fieldbyname(‘qte_stock’).asfloat:=Table4.fieldbyname(‘qte_stock’).asfloat-
Table3.fieldbyname(‘qte_vente’).asfloat;
Table4.post;
End;
Table3.next;
End;