In a tib_grid, I want to only color the title rectangle and not the
whole column for the column that is sorted. I would think that I
could do it in The GetCellProps procedure using something like

if ((ARow = 1) and
(TheGrid.GridFields[ACol].FieldName = TheQry.OrderingLinks
(TheQryqry.OrderingItemNo).text) then
AColor := clLime

but I can't get the syntax to work. Can I do it and how could it be
done? (I probably have to strip off the characters after the = in the
OrderingLinks to get just the field name, but that's not hard.)
Thanks in advance for any suggestions.

Stan Walker