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

[mohaa]

هل يوجد بديل ل set keyوfind key في adotable

[Mr.DOS]

سلام عليكم ورحمة الله
استعمل خاصية البحث اخي
شاهد الموضوع بماذا أعوض table1.findkey في adotable1 ؟

[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;

[Mr.DOS]

السلام عليكم يااخي لدي هذا الكود بtable ابحث عن كيفية استخدامه بواسطة adotable

نفس الشيئ table او adotable ..

[mohaa]

السلام عليكم جرب adotable.setkeyوadotable.gotokey ستلاحظ وجود خطا في ال compilation mlh hk

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

السلام عليكم
احد البدائل Locate

كود :

table3.first while not(table3.eof) do begin if Table4.Locate('reference’,Table3.fieldbyname(‘ref_prod’).AsString,[loCaseInsensitive]) then Begin Table4.edit; Table4.fieldbyname(‘qte_stock’).asfloat:=Table4.fi eldbyname(‘qte_stock’).asfloat- Table3.fieldbyname(‘qte_vente’).asfloat; Table4.post; End; Table3.next; End;

[mohaa]

مشكور يا اخي والله مشكور فقد لو تعلمني عن معنى parameter locaseinsentive وبارك الله فيك

[bassem_43]

مشكور يا اخي والله مشكور فقد لو تعلمني عن معنى parameter locaseinsentive وبارك الله فيك

ساجيبك بدلا من الاستاد عبد العزيز لو سمحت
نستعمل locaseinsentive ادا اردنا البحث عن قيمة دون التفريق بين الاحرف الصغيرة والكبيرة majuscules/minuscules.
بالتوفيق

[mohaa]

مشكور يا اخي وبارك الله فيك فقط لدي مشكل في auto increment في دلفي حيث انه يزداد تلقائيا في الاضافة لكن في الحدف يحدف السطر لكن القيمة لاتنقص علما اني اعمل ب SAL SERVER

[bassem_43]

مشكور يا اخي وبارك الله فيك فقط لدي مشكل في auto increment في دلفي حيث انه يزداد تلقائيا في الاضافة لكن في الحدف يحدف السطر لكن القيمة لاتنقص علما اني اعمل ب SAL SERVER

وفيك بركة يا اخي
تفضل تابع الموضوع حتى اخره
http://www.delphi4arab.net/forum/showthr...p?tid=3629
بالتوفيق