Проверяет, соответствует ли указанная строка указанному регулярному выражению.
function ExecRegExpr(aRegExpr: string; aInputStr: string): boolean;
var phone:='8(495)123-4567'; if ExecRegExpr ('\d{3}-(\d{2}-\d{2}|\d{4})', phone) then Log('Номер телефона указан верно') else Log('Номер телефона указан не верно');