实现部分：
无须编写代码，只要设置一下控件属性
需要修改这些属性：
BorderStyle改为bsNone
BevelKind改为bkSoft
BevelEdges下的项目中只将beBottom设为True，其余设为False
为了美观，最好再将Ctl3D设置为False。