SQL: Concat in WHERE-Klausel?

[omata]

Ich würde das ganze etwas übersichtlicher gestalten...

Delphi-Quellcode:

Format(
  'SELECT vorname||'' ''||name, eMail1, eMail2
   FROM adressen
   WHERE (eMail1 IS NOT NULL OR eMail2 IS NOT NULL) 
     AND vorname||'' ''||name = %s',
  [QuotedStr(Person.AsString)]
);