Question

Delphi中限制DBedit只能输入email地址？

我想在Emil这里只能输入电邮格式，然后单机确认添加人物信息的时候若不是email格式时，会弹出警告，怎么设置？代码？谢谢！

Answer 1

Dbedit 控件是输出数据库文件中的Field的一个控件，
你在它的 datafield 属性中选择要输出的Field

追问

额，我是说当我输入人物信息的时候，当按确认添加人物信息的时候，如果EMAIL这一栏的DBEDIT时候如果不是email格式就弹出警告这个意思

追答

如果不需要这个邮箱是否有效的话可以在输入的tring中找“@”
我相信大部分Email都有这个
if pos(‘@’，s)=0 then
showmessage('请正确输入邮箱地址');

追问

好的，我试试。