Ha, OK, indeed, nicer. (But I like your first peace of code too.)
For the new code, maybe using a variant variable and create a new sumfield() procedure: procedure tmsebufdataset.sumfield(const afield: tfield; out asum: variant); But for this, we need a variant-guru (I am beginner in variant type). Do you have problems using your first peace of code (apart for the look) ? -- Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/ _______________________________________________ mseide-msegui-talk mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk

