Grid.OnDrawCell: The drawstate set was not correctly reset after each loop.

This caused the OnDrawCell AFlags variable to always contain gdSelected
and gdFocused - which made OnDrawCell event handlers rather useless. This
is now fixed!

1 files changed, 1 insertions, 1 deletions

diff --git a/src/gui/fpg_basegrid.pas b/src/gui/fpg_basegrid.pas
index 50b17055..934bd382 100644
--- a/src/gui/fpg_basegrid.pas
+++ b/src/gui/fpg_basegrid.pas
@@ -560,7 +560,6 @@ var
   clipr: TfpgRect;   // clip rectangle
   drawstate: TfpgGridDrawState;
 begin
-  drawstate := [];
   Canvas.BeginDraw;
 //  inherited HandlePaint;
   Canvas.ClearClipRect;
@@ -605,6 +604,7 @@ begin
       r.Left := FMargin;
       for col := FFirstCol to ColumnCount-1 do
       begin
+        drawstate := [];
         r.Width := ColumnWidth[col];
         Canvas.SetClipRect(clipr);