自定义控件最简单的例子

h文件

class PACKAGE timagelist1 : public TImageList
{
private:
protected:
public:
        __fastcall timagelist1(TComponent* Owner);
__published:
};

 

cpp文件

static inline void ValidCtrCheck(timagelist1 *)
{
        new timagelist1(NULL);
}
//---------------------------------------------------------------------------
__fastcall timagelist1::timagelist1(TComponent* Owner)
        : TImageList(Owner)
{
}
//---------------------------------------------------------------------------
namespace Imagelist1
{
        void __fastcall PACKAGE Register()
        {
                 TComponentClass classes[1] = {__classid(timagelist1)};
                 RegisterComponents("Samples", classes, 0);
        }
}

注册属性编辑器

//Register all components
RegisterComponents('Png', [TPngSpeedButton, TPngBitBtn, TPngImageList, TPngImageCollection, TPngCheckListBox]);

//Register component editors
RegisterComponentEditor(TPngImageList, TPngImageListEditor);
RegisterComponentEditor(TPngImageCollection, TPngImageCollectionEditor);
RegisterComponentEditor(TPngBitBtn, TPngButtonEditor);
RegisterComponentEditor(TPngSpeedButton, TPngButtonEditor);

//Register property editors
RegisterPropertyEditor(TypeInfo(TPngImageCollectionItems), TPngImageList, 'PngImages', TPngImageListImagesEditor);
RegisterPropertyEditor(TypeInfo(TPngImageCollectionItems), TPngImageCollection, 'Items', TPngImageCollectionItemsEditor);