FocusedColumn may also be "InvalidColumn" (-2) when the relevant grid column is hidden. Fixes issue #2088.

This commit is contained in:
Ansgar Becker
2010-07-14 22:36:37 +00:00
parent b97c41bc6c
commit 65b701681e

View File

@ -7434,7 +7434,7 @@ begin
if Assigned(DataGrid.FocusedNode) then begin
KeyName := Mask(DataGridDB)+'.'+Mask(DataGridTable);
FocusedCol := '';
if DataGrid.FocusedColumn <> NoColumn then
if DataGrid.FocusedColumn > NoColumn then
FocusedCol := DataGrid.Header.Columns[DataGrid.FocusedColumn].Text;
DataGridFocusedCell.Values[KeyName] := IntToStr(DataGrid.FocusedNode.Index) + DELIM + FocusedCol;
end;