Re: [MSEide-MSEgui-talk] BufDataset

2021-05-19 Thread fredvs
Re-hello Med. sumfield is only implemented for double, currency, integer and int64: procedure sumfield(const afield: tfield; out asum: double); overload; procedure sumfield(const afield: tfield; out asum: currency); overload; procedure sumfield(const afield: tfield; out asum: integer)

Re: [MSEide-MSEgui-talk] BufDataset

2021-05-19 Thread fredvs
Hello Med. Maybe you can complete the code checking all types that can be summed: if (oField.datatype = ftinteger) then B1 else if (oField.datatype = ftcurrency) then B2 else if (oField.datatype = ftfloat) then B3 else if (oField.datatype = ftbcd) then B4 else if (oField.datatype = ftdate)

Re: [MSEide-MSEgui-talk] BufDataset

2021-05-19 Thread mohamed hamza
Hello Fred, The blocks B1 and B2 after if are redondant that all .This procedure works well. if (oField.datatype = ftinteger) then begin B1 else B2 Med De : fredvs Envoyé : mercredi 19 mai 2021 12:15 À : mseide-msegui-talk@lists.sourceforge.ne

Re: [MSEide-MSEgui-talk] BufDataset

2021-05-19 Thread fredvs
> Martin did not introduce variant_sumfield then for me it's not recommended. I agree and also it seems that using variant will make all the process slower. In the last code you give, in the first peace of code: procedure tfrmbasePagefo.DoSum(oDbGrid: TDbwidgetgrid; iRow:integer); VAR n:curre

Re: [MSEide-MSEgui-talk] [fpc-other] FireBird or MySql ?

2021-05-19 Thread mohamed hamza
You can also read this history of interbase https://en.ppt-online.org/223475 Med. De : Santiago A. Envoyé : lundi 17 mai 2021 17:37 À : General list for MSEide+MSEgui Objet : Re: [MSEide-MSEgui-talk] [fpc-other] FireBird or MySql ? El 11/05/2021 a las 15:18, vas

Re: [MSEide-MSEgui-talk] BufDataset

2021-05-19 Thread mohamed hamza
Hello Fred, Martin did not introduce variant_sumfield then for me it's not recommended. Med De : fredvs Envoyé : mardi 18 mai 2021 18:30 À : mseide-msegui-talk@lists.sourceforge.net Objet : Re: [MSEide-MSEgui-talk] BufDataset Ha, OK, indeed, nicer. (But I