Re: [MSEide-MSEgui-talk] BufDataset

Re... hello Med. Maybe you may try a other way. It seems to me that the kind of column in a BDStringgrid is assigned when you connect the fields to the tmsesqlquery1-field. So if you want to know the kind of column in a BDStringgrid, this should work: var str : string; datatype: tfieldtype;

Re: [MSEide-MSEgui-talk] BufDataset

Re_hello Med. You may try this (from previous post): if tdbwidgetcols(odbgrid.datacols.cols[iCol]).getitemclasstype = tdbintegerEdit then There is also this one: if tdbwidgetcols(odbgrid.datacols.items[iCol]).getitemclasstype = tdbintegeredit then ... But I really would prefer that you

Re: [MSEide-MSEgui-talk] BufDataset

Hello Med. > the line code which raise this error: > if tdbwidgetcols(odbgrid.datacols[iCol]).getitemclasstype = tdbintegerEdit > then ... Here I dont get error (but I dont have all your code and I dont find my ball) Hum, I dont understand fully the mse-synthax but could you try with this: (see

Re: [MSEide-MSEgui-talk] BufDataset

Hello Fred, I'd like to go back to the last discussions if you allow it. It"s about : segmentation fault lib/common/widgets/msewidgets.pas Line 4206 OF FUNCTION TCOL_SETOPTIONS1 the line code which raise this error is in procedure dosum if

Re: [MSEide-MSEgui-talk] BufDataset

Hello Med. To resume, I propose this for the patch: procedure sumfield(const afield: tfield; out asum: currency); "afield" type could be: [ftinteger,ftsmallint,ftword,ftbcd,ftfloat] // should we add ftlargeint? procedure sumfield(const afield: tfield; out asum: double); "afield" type

Re: [MSEide-MSEgui-talk] BufDataset

Hello Med. > because not all programmers want to sum integer into currency? Dis you try the msebufdataset.zip of my previuos post? No problem if a programmer want to sum integer into integer, he may still use:

Re: [MSEide-MSEgui-talk] BufDataset

Hello Fred, You did a lot . Now DoSum becomes: procedure tfrmbasePagefo.DoSum(oDbGrid: TDbwidgetgrid; iRow:integer); var iCol:integer; oField:TField; n:currency; begin with oDbGrid,oDbGrid.datalink.datasource do for iCol:=0 to datacols.count-1 do with datacols[iCol] do if tag>0 then