TFontNameComboBox及TFontSizeComboBox的实现

TFontNameComboBox及TFontSizeComboBox的实现(25)   if(Items->Count)
    ItemIndex = 0;
}
//---------------------------------------------------------------------------
namespace Fontcombobox
{
        void __fastcall PACKAGE Register()
        {
                 TComponentClass classes[2] = {__classid(TFontNameComboBox),
                                               __classid(TFontSizeComboBox)};
                 RegisterComponents("Samples", classes, 1);