delphi - 如何更新Delphi对象检查器？

Question

继我最近发布的这个问题之后:Can a Component Editor be executed on multiple components?

我为新组件创建了一个 ComponentEditor，执行时会显示一个 TOpenDialog 以选择配置文件。加载文件时，我读取数据并将值复制到调用组件(这是 Component，因为这是一个 TComponentEditor)。

完全没有问题，只是对象检查器没有更新以反射(reflect)新更改的值 - 它仅在单击设计器中的组件时才会更新。

这可能看起来没什么大不了的，但我需要对象检查器以某种方式更新自身，以便我可以看到属性已成功更改(无需将焦点切换回控件)。

那么，有什么方法可以让 Delphi 知道它应该更新/刷新对象检查器吗？我

Answer 1

根据需要修改组件后，您的组件编辑器需要调用IDesigner.Modified()方法，例如:

procedure TMyComponentEditor.ExecuteVerb(Index: Integer);
var
  Dlg: TOpenDialog;
begin
  ...
  Dlg := TOpenDialog.Create(nil);
  try
    ...
    if Dlg.Execute then
    begin
      ...
      Designer.Modified;
    end;
  finally
    Dlg.Free;
  end;
  ...
end;