From 1540c74d319f667eb190be3fc2ffd869b588caa9 Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Fri, 12 Mar 2010 21:29:42 +0000 Subject: [PATCH] Missing change for r3124 - wrong column type detection --- source/main.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/main.pas b/source/main.pas index 6d3a7bd0..1448105d 100644 --- a/source/main.pas +++ b/source/main.pas @@ -3661,7 +3661,7 @@ begin for j:=0 to Length(DataGridResult.Columns)-1 do begin SetLength(DataGridResult.Rows[i].Cells, Data.ColumnCount); Cell := @DataGridResult.Rows[i].Cells[j]; - case Data.DataType(j).Category of + case DataGridResult.Columns[j].DatatypeCat of dtcInteger, dtcReal: Cell.Text := FormatNumber(Data.Col(j), False); dtcBinary: Cell.Text := GetBlobContent(Data, j); else Cell.Text := Data.Col(j);