Pointwise operations over functions?

Is there a general way to express pointwise operations over functions?
in the simple cases we can use Through:

Through[(Sin+Cos)[1]]=Sin[1]+Cos[1]

However, if our function is more complicated, for example, Sin+Cos Exp then

Through[(Sin+Cos Exp)[1]]=Sin[1]+Cos Exp[1]

and we would like to obtain Sin[1]+Cos[1]Exp[1].
Is there some function F[expression,point] which returns the value of the expression in the point where the operations over functions are pointwise?

Use function notation:

(Sin[#]+Cos[#]*Exp[#])&

You can apply this to a number or map it over a list of numbers, etc.

Regards