我可以在工作线程中执行TDataSet.DisableControls而不用Synchronize（）包装它吗？

Question

首先，我不确定允许工作线程禁用控件是一个好的设计。 但是，我很好奇，如果不与GUI同步，我可以安全地做到吗？

TDataSet中的代码如下所示：

procedure TDataSet.DisableControls;
begin
  if FDisableCount = 0 then
  begin
    FDisableState := FState;
    FEnableEvent := deDataSetChange;
  end;
  Inc(FDisableCount);
end;

所以看起来很安全。 在EnableControls的情况下，情况会有所不同。 但是，DisableControls似乎只会增加锁定计数器并分配在EnableControls期间触发的事件。

你怎么看？

Answer 1

这样做看起来很安全，但事情可能会出错，因为这些标志用于代码中，这些代码可能在您从线程调用此方法时正在执行。

我会将调用同步到DisableControls，因为只有在没有控件使用它时，您希望线程开始使用此数据集。 对EnableControls的调用也可以同步，或者您可以使用PostMessage将消息发布到表单。 这样，线程就不必等待主线程了。

但我的直觉告诉我，对于GUI和线程根本不使用相同的数据集可能会更好。

Answer 2

没有查找实际代码：它可能是安全的，只要你可以确定主线程当前不访问FDisableCount，FDisableState和FEnableEvent。 这里有可能出现竞争状况。

我仍然建议您从主线程中调用DisableControls。