[SOLVED] DBGrid flash row
lazarus / 16-Databases

----------------------------------------------------------------------
pcurtis · 2021-03-09 11:25

Hi All,

looking for help / constructive ideas / suggestions.

I have a small DBGrid (max 20 rows, all on view). I would like to
"flash" (e.g. change background colour) for say 500ms, when any data
in that row changes.

Any ideas how to approach this one?

Thanks in advance.

----------------------------------------------------------------------
pcurtis · 2021-03-20 05:42

OK, I finally got round to this. It's easy.

Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i procedure
TForm1.MyDBGrid1PrepareCanvas(sender: TObject; DataCol: Integer;
Column: TColumn; AState: TGridDrawState);begin  if
(SecondsBetween(now, ZQuery1['fnTIMESTAMP']) < 1) and (DataCol = 0)
then    begin      MyDBGrid1.Canvas.Font.Style := [fsBold, fsItalic]; 
    MyDBGrid1.Canvas.Font.Color := clRed;    end;end;