Question

Delphi 6.0的编辑器

Answer 1

Delphi中用户可以自己声明属性编辑器在程序设计期间对第三方控件进行设计，对属性编辑器的声明可以在注册控件的时候通过RegisterComponentEditor过程进行定义，具体为：
procedure RegisterComponentEditor(ComponentClass: TComponentClass; ComponentEditor: TComponentEditorClass);
当然，用户在注册前要定义自己的属性编辑器，下面是一个例子：
TOutlookBarEditor = class(TComponentEditor)
function GetVerb(Index: Integer): string; override;
function GetVerbCount: Integer; override ;
procedure Edit; override;
procedure ExecuteVerb(Index: Integer); override;
end;
引用RegisterComponentEditor
其中最关键的部分在于对RegisterComponentEditor的引用。
在Delphi5.0中，可以直接将$(DELPHI)\Source\ToolsAPI目录下的DsgnIntf.pas文件拷贝到控件的设计目录下或者拷贝到$(DELPHI)\Lib目录即可。
在Delphi6.0中，Delphi将文件分解成DesignIntf.pas和DesignEditors.pas两个文件，所以引用时要将$(DELPHI)\Source\ToolsAPI目录下的DesignIntf.pas和DesignEditors.pas两个文件拷贝到控件的设计目录下或者拷贝到$(DELPHI)\Lib目录。
当然，如果你的Delphi Package的搜索路径或者Delphi IDE的搜索路径可以搜索到$(DELPHI)\Source\ToolsAPI目录就省去此麻烦。