Averiguar el número de repeticiones de un caracter

[Javi2]

Hola, me gustaría saber si existe alguna función en Delphi que te devuelve el número de veces que existe un determinado caracter en una cadena.

(Por ejemplo, el número de repeticiones del caracter "&" en la cadena 'abc&&def&fg' sería 3).

Muchas gracias.