提供一点思路:
    创建一个基于TWinControl的控件,或者直接一点,基于TPanel,
    组件的Contructor里面自动创建一个TImage, TLabel, 调整位置,
    并且提供Image及Text属性,以便访问Image以及修改Label的文字。
应该不难吧

解决方案 »

  1.   

    但TPanel 有边框,做出来不似快捷方式图标???
      

  2.   

    可以去掉TPanel的边框的呀!
    Panel那么多属性,BevelInner :=  bvNone, BevelOuter := bvNone;
      

  3.   

    这样的元件,建议不要从TWinControl继承,也不要用TPanel,从TGraphicControl比较好
      

  4.   

    继承也可以,不过 Delphi 中可以把控件的源代码 COPY 过来再改改,这样自由得多
      

  5.   

    继承也可以,不过 Delphi 中可以把控件的源代码 COPY 过来再改改,这样自由得多
      

  6.   

    yes!yes!yes!yes!yes!yes!yes!yes!yes!yes!yes!