如何实现双击TCollectionItem时调用对应属性编辑器？

你的判断是正确的，默认Delphi集合编辑器（TCollectionEditor）未实现列表项的双击事件，要实现双击集合项打开MyProp的属性编辑器，必须自定义集合编辑器并扩展其功能。以下是具体实现步骤：

1. 自定义集合编辑器类 #

继承ColnEdit.pas中的TCollectionEditor，重写构造方法并添加双击事件处理逻辑：

unit MyCollectionEditor;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ColnEdit, DesignIntf, DesignEditors, StdCtrls, ComCtrls;

type
  TMyCollectionEditor = class(TCollectionEditor)
  private
    procedure ListViewDblClick(Sender: TObject);
  public
    constructor Create(AOwner: TComponent; ADesigner: IDesigner; ACollection: TCollection); override;
  end;

implementation

uses
  MyComponents; // 引用你的自定义组件单元，包含TMyCollectionItem、TMyProp

{ TMyCollectionEditor }

constructor TMyCollectionEditor.Create(AOwner: TComponent; ADesigner: IDesigner; ACollection: TCollection);
begin
  inherited Create(AOwner, ADesigner, ACollection);
  // 给编辑器内部的ListView绑定双击事件
  FListView.OnDblClick := ListViewDblClick;
end;

procedure TMyCollectionEditor.ListViewDblClick(Sender: TObject);
var
  Item: TMyCollectionItem;
  PropEditor: IProperty;
begin
  // 无选中项时直接返回
  if FListView.Selected = nil then Exit;
  // 获取选中的集合项实例
  Item := TMyCollectionItem(FItems[FListView.Selected.Index]);
  if Assigned(Item) and Assigned(Item.MyProp) then
  begin
    // 通过Designer获取MyProp属性的编辑器接口
    PropEditor := Designer.GetComponentProperty(Item, 'MyProp');
    if Assigned(PropEditor) then
    begin
      // 调用属性编辑器的编辑方法
      PropEditor.Edit;
    end;
  end;
end;

end.

2. 注册自定义集合编辑器 #

在组件注册单元中，将自定义集合编辑器与你的TMyCollection类型关联：

unit MyComponentsReg;

interface

uses
  Classes, DesignIntf, DesignEditors, MyComponents, MyCollectionEditor;

procedure Register;

implementation

procedure Register;
begin
  // 注册自定义控件
  RegisterComponents('My Components', [TMyComponent]);
  // 为TMyCollection绑定自定义集合编辑器
  RegisterCollectionEditor(TMyCollection, TMyCollectionItem, TMyCollectionEditor);
end;

end.

关键说明 #

• 必须引用ColnEdit单元才能访问TCollectionEditor的内部控件FListView
• 通过FItems数组结合列表选中项索引，可直接获取对应的TMyCollectionItem实例
• 使用Designer.GetComponentProperty方法，可复用你已注册的MyProp属性编辑器
• 增加多层空值判断，避免IDE设计时出现异常

内容的提问来源于stack exchange，提问作者Jerry Dodge