TDBSumList 1.0

Tested under Delphi 3,4.

Component is intended for count sums and amounts of record in TDataSet
with dynamic watching a changing
Component is kept list of TDBSum objects, which contains type of group operations 
(goSum or goCount) and name sum field (for goCount name of field unnecessary).


Properties and events in TDBSumList
property SumCollection:TDBSumCollection; 
    // Collection of TDBSum 
property DataSet: TDataSet; 
    // DataSet for which are counted sums and amount of record
event SumListChanged: TNotifyEvent; 
    // Write an OnAfterPivot event handler to take specific action after change
       in DBSum.SumValue.


Properties and events in TDBSumList
TGroupOperation = (goSum,goCount); 
    // Group operation
property FieldName:String; 
    // Name of field for summing
public 
SumValue:Currency; 
    // Sum value or record count


Restrictions and particularities of functioning.
Filter is taken into account in counting of record count.


INSTALLATION
Open menu "Component\Install Component...". In "Unit file name" browse 
DBSumLst.pas. In "Package file name" browse LIB\dclusr30.dpk (dclusr40.dpk
in Delphi 4) . Click Ok.

Contact me if you have any questions, comments or suggestions:
Programmer: Dmitry V. Bolshakov
(4232)41-19-82 (voice in Russia)
Home page: tax25.marine.su/dmitryb
E-mail: dmitryb@tax25.marine.su
FidoNet 2:5045/41.63
QCI # 10785451