Delphi编写ComboBox派生控件的简易示例