这个控件该怎么做呢？

组件名称: THZDBEdit

功能: 结合TDBEdit 的数据感应功能,

1.支持纯数字/日期时间格式hh:nn /文字的输入 EditMask

2.支持三种显示效果 DisplayStyle

传统效果 <!--[if gte vml 1]><v:shapetype id="_x0000_t75" coordsize="21600,21600" o:spt="75" o:preferrelative="t" path="m@4@5l@4@11@9@11@9@5xe" filled="f" stroked="f"> <v:stroke joinstyle="miter" /> <v:formulas> <v:f eqn="if lineDrawn pixelLineWidth 0" /> <v:f eqn="sum @0 1 0" /> <v:f eqn="sum 0 0 @1" /> <v:f eqn="prod @2 1 2" /> <v:f eqn="prod @3 21600 pixelWidth" /> <v:f eqn="prod @3 21600 pixelHeight" /> <v:f eqn="sum @0 0 1" /> <v:f eqn="prod @6 1 2" /> <v:f eqn="prod @7 21600 pixelWidth" /> <v:f eqn="sum @8 21600 0" /> <v:f eqn="prod @7 21600 pixelHeight" /> <v:f eqn="sum @10 21600 0" /> </v:formulas> <v:path o:extrusionok="f" gradientshapeok="t" o:connecttype="rect" /> <o:lock v:ext="edit" aspectratio="t" /> </v:shapetype><v:shape id="_x0000_i1025" type="#_x0000_t75" style='width:109.5pt; height:17.25pt'> <v:imagedata src="file:///C:/DOCUME~1/ADMINI~1/LOCALS~1/Temp/msohtml1/01/clip_image001.png" o:title="" /> </v:shape><![endif]--><!--[if !vml]--><!--[endif]-->

下划线: <!--[if gte vml 1]><v:shape id="_x0000_i1026" type="#_x0000_t75" style='width:141.75pt;height:39pt'> <v:imagedata src="file:///C:/DOCUME~1/ADMINI~1/LOCALS~1/Temp/msohtml1/01/clip_image003.png" o:title="" /> </v:shape><![endif]--><!--[if !vml]--><!--[endif]-->

平板边框: <!--[if gte vml 1]><v:shape id="_x0000_i1027" type="#_x0000_t75" style='width:122.25pt;height:38.25pt'> <v:imagedata src="file:///C:/DOCUME~1/ADMINI~1/LOCALS~1/Temp/msohtml1/01/clip_image005.png" o:title="" /> </v:shape><![endif]--><!--[if !vml]--><!--[endif]-->

3.要求失去光标的时候显示效果为以上效果, 如果得到光标 则,根据设置显示 ComboBox 下拉选择或 <!--[if gte vml 1]><v:shape id="_x0000_i1028" type="#_x0000_t75" style='width:102.75pt;height:27.75pt'> <v:imagedata src="file:///C:/DOCUME~1/ADMINI~1/LOCALS~1/Temp/msohtml1/01/clip_image007.png" o:title="" /> </v:shape><![endif]--><!--[if !vml]--><!--[endif]-->点击右边下拉时弹出选择窗体,可以可以查询选择后确定

4.注意, 字段显示有2中模式如果为 ComboxStyle 等的, 可以有DisplayText 值,也就是显示值与数据值分开,得到光标时显示的是字段数据值,失去光标后,显示的是DisplayText 的显示值

5.支持数据感应的设置<!--[if gte vml 1]><v:shape id="_x0000_i1029" type="#_x0000_t75" style='width:141.75pt;height:30.75pt'> <v:imagedata src="file:///C:/DOCUME~1/ADMINI~1/LOCALS~1/Temp/msohtml1/01/clip_image009.png" o:title="" /> </v:shape><![endif]--><!--[if !vml]--><!--[endif]--> ,如果是ComboBox格式的, 支持<!--[if gte vml 1]><v:shape id="_x0000_i1030" type="#_x0000_t75" style='width:137.25pt;height:30pt'> <v:imagedata src="file:///C:/DOCUME~1/ADMINI~1/LOCALS~1/Temp/msohtml1/01/clip_image011.png" o:title="" /> </v:shape><![endif]--><!--[if !vml]--><!--[endif]-->的下拉选择的预选定义选择想…可参考DBComboBox1, 但原有DBComboBox1缺少了KeyItems 的数据值与显示值.

6.以上控件可支持日期格式的组件.