cxgridハイライト（または色）は、私が持っているフォームのclosequeryにフォームclosequery

Question

上のセルを変更しましたイベント？

私は変更内容を知る必要はなく、ユーザーが変更を保存するために気候を簡単に決定できるように、どのセルが変更されたかを知るだけです。

Answer 1

cxGrid1DBTableView1CustomDrawCellイベントを使用して、何らかの方法でハイライトされたセル（または行）を描画するためにcxGridを取得するのは簡単です。また、OnCloseQueryイベントが進行中であることを示すフラグを設定することで、そのイベントをそのイベント内に制限することができます。

更新この回答で最初に投稿したコードは、現在のグリッド行に複数のセルを変更しても正常にマークできませんでした。下の更新されたコードはこれを行うことができます。手順2の のコメントに注意してください。

type 
    TForm1 = class(TForm) 
    [...] 
    public 
    QueryingClose : Boolean; 
    end; 

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); 
begin 
    try 
    QueryingClose := True; 
    //{cxGrid1.Invalidate{True); Do NOT call Invalidate, because it causes the 
    // grid's repainting logic to operate in a way which effectively makes it 
    // impossible to mark more that one cell in the current data row as changed 
    ShowMessage('Close?'); 
    finally 
    QueryingClose := False; 
    end; 
end; 

procedure TForm1.cxGrid1DBTableView1CustomDrawCell(Sender: 
    TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: 
    TcxGridTableDataCellViewInfo; var ADone: Boolean); 
var 
    Field : TField; 
    MarkCell : Boolean; 
    S1, 
    S2 : String; 
    EC : TcxGridTableEditingController; 
begin 
    if QueryingClose and 
    (TcxGridDBTableView(Sender).DataController.DataSet.State in[dsEdit, dsInsert]) then begin 
    Field := TcxGridDBColumn(AViewInfo.Item).DataBinding.Field; 
    S1 := VarToStr(Field.OldValue); 

    // When this event is called, the user may be in the middle of editing a cell's contents 
    // So, the purpose of the following lines is to close the inplace editor being used to do 
    // this amd post the chamged value back to the TField associated with the cell 
    EC := TcxGridDBTableView(Sender).Controller.EditingController; 
    if EC.IsEditing then 
     EC.HideEdit(True); 

    S2 := VarToStr(Field.Value); 
    MarkCell := S1 <> S2; 
    if MarkCell then 
     ACanvas.Brush.Color := clLime; 
    end; 
end; 

これを実行するには、TDataSet-descendant型でOldValueプロパティのフィールドの元の内容を正しく返す必要があります。私がこのコードを書いてテストするのに使ったTClientDataSetは確かにこれを行いますが、実際のTDataSetタイプを知りません。

には、FieldName OldValueやValueなどの値が変更されたTFieldのリストを作成するために、これらの2つの手順を使用できます。