For a = 0 to edittext1.lenght-1
If stringat(edittext1.text,a) ="@" then its an e-mail
Else if a = edittext1.lenght-1 then end of string, no e-mail
Next
This is just the concept, you have to come with the code yourself
You can also use a masked EditText with this lib. As plus you find in the example regex-code which checks whether the input is valid (is an allowed eMail) or not. Informatix´s Libs rocks