想在自己的控件右键加入TADOQuery的fields editor，请问在哪个pas单元可以找到参考代码？

Question

想自己做一个表格控件，里面有一个FClientDataSet变量，我想设计期添加ClientDataSet的Fields,例如右键点控件调用fields editor（如同TADOQuery那样）
我现在知道应该使用组件编辑器,要从TComponentEdit继承，但是调用fields editor的代码应该怎么写呢？我找了半天源码但不知在哪里有可以参考的写法？多谢了

Answer 1

參考dsDesign.Pas
procedure ShowFieldsEditor(Designer: IFormDesigner; ADataset: TDataset;
  DesignerClass: TDSDesignerClass);function CreateFieldsEditor(Designer: IFormDesigner; ADataset: TDataset;
  DesignerClass: TDSDesignerClass; var Shared: Boolean): TFieldsEditor;