[السيد الغالي]

الاخ العزيز السلام عليكم
المشكلة لديك هي كالاتي :
يوجد لديك جدولين الجدول الاول المعروض pharstore والجدول الاخر هو sale2 ولا توجد اي علاقة بين الجدولين فعندما تضيف اكثر من سجل في الفاتورة ثم تريد ان تحذفف السجل الاول فانك تحدفه من الجدول الاول pharstore وهنا لا توجد مشكلة لكن المشكلة في الجدول الثاني sale2 فعندما تحدد السجل الاول من الجدول pharstore فانك لا تحدد السجل الاول من الجدول الثاني sale2 بل على العكس انك وضعت كود في زر اتمام البيع rsn.MoveLast تجبره ان يذهب الى السجل الاخير
وعند الضغط على زر حذف يحذف السجل الاول من الجدول pharstore ويحذف السجل الاخير من الجدول sale2 والسجل الاول لا يحذف لانك لم تحدده وانما حددت السجل الاخير اما كود البحث الذي وضعت وهو
Data3.RecordSource = "select * from [sale2] where [ßæÏ ÇáÕäÝ]='" & Text5.Text & "' " '"
Data3.Recordset.Delete
Data3.Refresh
فانه يعقد المشكلة اكثر مما يحلها كيف؟
انت تبحث عن كود الصنف . وكود الصنف يمكن ان يتكرر في نفس الفاتورة واكيدا انه يتكرر في فواتير اخرى ففي هذه الحالة اي سجل سيحذف ؟ يحتمل ان يحذف سجل انت لا ترغب بحذفه لان كود البحث يعطيك جميع الاصناف التي لها نفس الكود ولجيمع الفواتير وهنا المشكلة !!!
لذا اخي العزيز حاول ان تحدد السجل الذي تريد ان تحذفة من الجدولين بعد ان تعرض الجدول sale2 من خلال DBGrid12 تربطها بالاداة data3 ويكون كود البحث برقم الفاتورة عندها تعرض لك السجلات لتلك الفاتورة ثم تحدد السجل الذي ترغب بحذفه من DBGrid1 و DBGrid2 يعني الاثنان معا ثم تنفذ عملية الحذف
هذه الاجراء غير عملي ولكن ايسر الطرق حاليا ويوجد حل اخر حسب رأيي واتمنى ان يكون صائبا وهو ان تعيد برمجة مشروعك بشكل عكسي يعني الذي يعرض هو الجدول sale2 وليس الجدول pharstore لانه لا تحتاجه حسب فهمي الا في حالة طرح عدد المواد من المواد المخزونة علما اني جربت الطريقة الاولى وعملت بالشكل الصحيح
جرب ذلك اوبلغني
واسف على الاطالة
تحياتي لك