如何更新Delphi Object Inspector？

Question

继我最近发布的这个问题后,可以在多个组件上执行组件编辑器吗？

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

完全没有问题,除了Object Inspector没有更新以反映新更改的值 - 它仅在单击Designer中的组件时更新.

它可能看起来不是什么大不了的事,但我需要Object Inspector以某种方式更新自己,以便我可以看到属性已成功更改(无需将焦点切换回控件).

那么,有没有办法让Delphi知道它应该更新/刷新Object Inspector？一世

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;