From a2825db869cc77f7b38e5ca91fa86f97045e76bf Mon Sep 17 00:00:00 2001 From: alexs75 Date: Thu, 12 Jan 2017 08:40:43 +0000 Subject: [PATCH] RxFPC:fix format integer value in RxDBGrid footer row git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5631 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/rx/trunk/rxdbgrid.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/rx/trunk/rxdbgrid.pas b/components/rx/trunk/rxdbgrid.pas index 116e8e103..84d7262e4 100644 --- a/components/rx/trunk/rxdbgrid.pas +++ b/components/rx/trunk/rxdbgrid.pas @@ -1249,7 +1249,7 @@ begin if FDisplayFormat = '' then Result := IntToStr(Round(FTestValue)) else - Result := Format(FDisplayFormat, [Round(FTestValue)]); + Result := FormatFloat(FDisplayFormat, FTestValue); end else begin