خطا في الحساب التراكمي

[محمد الدرة]

السلام عليكم ورحمة الله

عندي مشكله في الحساب
اعمل على برنامج محاسبي ومشكلتي هي عند اظهار حركة العميل
عندي حقلين حقل للمدين وحقل للدائن وهناك حقل حسابي يوجد لي حيابة التراكمي على سبيل المثال

مدين دائن الرصيد
2000 0 2000
0 1000 1000
3000 0 4000
0 4000 0
قمت باستخدام الحدث calc للمكون adoquery

fieldbyname('blnc').AsCurrency := blnc2 +
(fieldbyname('proin').AsCurrency - fieldbyname('proout').AsCurrency);
blnc2 := fieldbyname('blnc').AsCurrency;
حيث blnc2 هو متغير وسيط يحمل الرصيد المتراكم من العملية السابقة

المشكله هي عندما اعمل سكرول لمكون dbgrid يقوم بعملية الحساب من جديد ويضيف آخر قيمه في آخر سجل للسجل الاول لان
blnc2 اخذت قيمة اخر سجل ولم استطع حل المشكله
فكيف اتغلب عليها
وهل استطيع ان اعمل مثل هذا باوامر الsql