delphi TEdit设为下横线,类似填表格效果,无需第三方控件就可以实现。

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

05-11 12:49