delphi TEdit设为下横线,类似填表格效果,无需第三方控件就可以实现。无须编写代码,只要设置一下控件属性 需要修改这些属性: BorderStyle改为bsNone BevelKind改为bkSoft BevelEdges下的项目中只将beBottom设为True,其余设为False 为了美观,最好再将Ctl3D设置为False。