Delphi - Validar Email

Neste vídeo, mostro como criar uma função que valide se o email informado está correto ou não.
No caso, validamos apenas se a estrutura básica do endereço de email está correta, ou seja: se possui ao menos um "." e um "@" apenas.