Advstringgrid font problem with VCL Styles

I am setting the font color and font attributes on a cell-by-cell basis using the fontstyles and fontcolors methods. When the application is not using VCL styles, the text is colored and styled appropriately while typing values into a cell. However, when a style is enabled, the color and style settings are ignored while typing but the text appears correctly after the text is "set" (enter is pressed or focus is given to another cell). I also tried disabling the styling of the fonts by unchecking styleelements.seFont but that had no effect. Can you fix this so that the proper settings are used while editing a cell (preferred) or at least allow disabling of VCL styling of the font?

Make sure you have the latest version of the component and set grid.StyleElements.seClient = false.

I \updated yesterday and the problem persists with  set grid.StyleElements.seClient = false (set in the object inspector).

To reproduce the error, drop advstringgrid on a form. 


1. Add the following to the form's oncreate handler:
procedure TForm1.FormCreate(Sender: TObject);
var arow,acol:integer;
begin
advstringgrid1.styleelements := [seFont,seBorder];
AdvStringGrid1.Options := [goFixedVertLine,goFixedHorzLine,goVertLine,
   goHorzLine,goRangeSelect,goEditing];
for ARow :=  1 to advstringgrid1.rowcount-1  do
for ACol := 1 to advstringgrid1.colcount-1 do
      AdvstringGrid1.FontColors[ACol, ARow] := clred;

end;

2. Run the program and enter text into any cell. As expected, text is red as it is being entered.

3. Now set the vcl style to Luna and rerun the program. Text is black as it is being entered and is not red until enter is pressed or a different cell is clicked.

Testing was done in Windows 10, XE7, 32 bit, advstringgrid version 7.8.7.0.


We fixed the problem and the next update will address this.