كيف اقوم بجمع قيم حقل ؟

[TAB27]

بسم الله الرحمن الرحيم

السلام عليكم ورحمه الله تعالي وبركاته

كيف اقوم بجمع قيم حقل كما بالصورة ؟

http://i44.tinypic.com/9lcz2w.jpg

[B.M.AbdelAziZ]

وعليكم السلام
فرضا Table1 هو الجدول Caisse
Sold متغير من نفس نوع الحقول
حلقة مثل هذه كفيلة بالحساب

Sold := 0;
Table1.First;
Repeat
Table1.Edit;
Sold := Sold + Table1.FieldByName('Recettes').AsFloat;
Sold := Sold - Table1.FieldByName('Depenses').AsFloat;
Table1.FieldByName('Solde').AsFloat := Sold;
Table1.Post;
Table1.Next;
Until Table1.Eof;

انتبه اسم الحقل الثاني Depenses بدون "é"
وحتى تحافظ على ترتيب السجلات من الاحسن اضافة حقلAutoInc
وبالتوفيق

[kachwahed]

وعليكم السلام ورحمة الله وبركاته
للاستزادة، راجع هذا:
كيف اقوم بجمع قيم حقل واحد (http://www.delphi4arab.com/forum/showthread.php?t=1070)
بالتوفيق.