delphi - TClientDataSet 的当前焦点字段

Question

我有一种情况，我必须允许用户更新dbgrid（连接到 CDS）的2 个字段中的任何一个，以保留最后输入的字段。所以（在用户输入数据后）我需要获取当前的焦点控件，这样我将删除以前的字段数据（如果有的话）。除了这两个之外，我还有其他领域。

坚持不使用任何与网格相关的事件，我必须只使用 CDS 事件来实现这一点。

在此先感谢，维杰。

Answer 1

使用该字段的 OnChange 事件，并清除其他字段值（如果有）：

像这样的东西：

TForm1.cdsField1Change(Sender: TField);
begin
  if not Sender.IsNull then
    cdsField2.Clear;
end;

TForm1.cdsField2Change(Sender: TField);
begin
  if not Sender.IsNull then
    cdsField1.Clear;
end;