如何转换基于TGraphicControl的控件,使多作成ActiveX!!!
在线等谢谢!

解决方案 »

  1.   

    假设转换\delphi\demos\propedit目录中的tpie 元件,由于tpie是基于tgraphiccontrol的控件,因此,首先改写tpie,否则,tpie元件不会出现在activex控件向导的vcl class name 内
    要改写tpie元件,首先打开\delphi\demos\propedit目录的pies.pas文件,找到tpie的声明:
      tpie = class(tgraphiccontrol)
      fpen:tpen;
      ....然后把tpie的基类改为tcustomcontrol;
    tpie = class(tcustomcontrol);
    接着使用project菜单options 到directories/conditionals 页,在search path 键入pies.pas的完整路径。
    最后,打开位于\delphi\demos\propedit目录中的pielib.dpk文件,在包编辑器中单击install按钮,新的tpie元件就加入到元件选项板的samples页