delphi 仅带下划线的TEdit控件

在做录入框的时候，很希望有一个只带下划线的文本框，网上介绍的很多，有自己做组件的，须不知Delphi下只需要简单设置几个属性即可达到目的。