pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

RxFPC:fix format integer value in RxDBGrid footer row

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5631 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2017-01-12 08:40:43 +00:00
parent 49cbe4ab65
commit a2825db869
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/rx/trunk/rxdbgrid.pas
View File

@ -1249,7 +1249,7 @@ begin
if FDisplayFormat = '' then if FDisplayFormat = '' then
Result := IntToStr(Round(FTestValue)) Result := IntToStr(Round(FTestValue))
else else
Result := Format(FDisplayFormat, [Round(FTestValue)]); Result := FormatFloat(FDisplayFormat, FTestValue);
end end
else else
begin begin