devGrid中，在表格编辑中如何调用自画事件，分不够再加

Question

procedure TfrmEmployee.cxGridEmployeeDBTableViewCustomDrawCell(
  Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
  AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
  AViewInfo.Style.Color := clRed;
end;
procedure TfrmEmployee.cxGridEmployeeDBTableViewEditValueChanged(
  Sender: TcxCustomGridTableView; AItem: TcxCustomGridTableItem);
begin
//在这儿调用上面的事件，请问如何调用
end;

Answer 1

安裝完devExpress後, 
C:\Program Files\Developer Express Inc\ExpressQuantumGrid 5\Delphi 7\Demos
下就有演示代碼!

Answer 2

离結果還差一點點，下班了．繼續關注本貼.....
procedure TForm1.cxGrid1DBTableView1CustomDrawCell(
  Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
  AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
var
  ARec: TRect;
  ATextToDraw, val: string;
  AIsVertical: Boolean;
begin  ARec := AViewInfo.EditBounds;  if cxGrid1DBTableView1.Columns[AViewInfo.Item.Index].DataBinding.Field.OldValue <>
    cxGrid1DBTableView1.Columns[AViewInfo.Item.Index].DataBinding.Field.NewValue then
  begin
    ACanvas.Canvas.Brush.Color := clBlue;
    ACanvas.Canvas.Font.Color := clGreen;
  end
  else
  begin
    ACanvas.Canvas.Font.Color := clRed;
    ACanvas.Canvas.Brush.Style := bsSolid;
  end;
  ACanvas.Canvas.FillRect(ARec);end;