Topic: any one help me for this code
i need help check this code when the DateTime now is = date end....... .Then change color Cells[4,i] to Red.
procedure Form1_GridEmployees_OnChange (Sender: string);
var
i: integer;
c: integer;
begin
c := Form1.GridEmployees.RowCount - 1; for
i := 0 to c do
begin
If Form1.GridEmployees.Cells[4,i] = FormatDateTime('c', Now);
Then Form1.GridEmployees.Cell[4,i].Color := clRed
Else Form1.GridEmployees.Cell[4,i].Color := clLime;
end;
end;