RxDBGrid and DisplayFormat
lazarus / 5-Lazarus Extra Components

----------------------------------------------------------------------
JochenKauz · 2017-07-13 15:36

Hi,
got a Sigsev crash if I use Footer Columns (FvtSum, FvtCount) and
DisplayFormat property in a column. This is regardless if the column
has got a footer value, or not.

I tried newest trunk revision of rxdbgrid, but no change.
My environment
Lazarus 1.8.0RC3 and FPC 3.0.2
RxDBGrid bound to MSSQLConnection.

CallStack shows me that packages\fcl-db\src\base\bufdataset.pas raises
the SigSev in getrecno.

I fixed it for me with moving savepos:=DHS.recno in CalcStatTotals
right after SaveState

Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i procedure
TRxDBGrid.CalcStatTotals;...  {$IFDEF NoAutomatedBookmark} 
P:=DataSource.DataSet.GetBookmark;  {$ELSE}  P := DHS.Bookmark; 
{$ENDIF}   SaveState:=DHS.SetTempState(dsBrowse); 
SavePos:=DHS.RecNo;   SaveAfterScroll:=DHS.AfterScroll; 
SaveBeforeScroll:=DHS.BeforeScroll;  DHS.AfterScroll:=nil; 
DHS.BeforeScroll:=nil;   SaveActiveRecord:=Datalink.ActiveRecord; 
Datalink.ActiveRecord:=0;  # SavePos:=DHS.RecNo; 
Cheers
JochenKauz

----------------------------------------------------------------------
alexs75 · 2017-07-17 07:55

1. Please - send test. I'm test with ZEOS, DBDataSet, RxMemDatatSet -
work normal.

2. variable SavePos - position of first visible record in grid. it's
not current record.

----------------------------------------------------------------------
JochenKauz · 2017-07-17 08:44

Hi,
I use MSSQLConnection with TSQLTransaction and TSQLQuery.
First TSQLQuery.open works as expected.
It does happen if I close the TSQLQuery, and then reissue a
TSQLQuery.open.
I will try to make a strip of my application and send it to you.

----------------------------------------------------------------------
alexs75 · 2017-07-18 06:42

I do not have MS SQL, can I have an example on PostgreSQL or Firebird?

----------------------------------------------------------------------
JochenKauz · 2017-07-18 11:36

Hmm.. I can try to install Firebird Server.
Perhaps it is a specific problem with TinyTDS and MSSQL-Server.