¿Existe alguna función para saber si una cadena tiene un formato determinado?

[Kandorf]

Siento preguntar por una función, pero he estado buscando de todas las maneras que sé y no he encontrado nada.

Antes de nada quiero aclarar que no estoy pidiendo que me hagan una función, es para saber si existe o si alguien la ha implementado por algún lado, y si no, para implementarla yo, con lo que se aceptarían consejos.

Busco algo así como una función a la que se le pasen dos strings: uno para la cadena en la que comprobar y otra en la que se indicaría el formato; y que devuelva un booleano.

La función sería algo así:

Código Delphi [-]
function ComprobarFormato(Cadena, Formato: String): Boolean;

Ejemplos de su utilización sería:
ComprobarFormato(1/4/2010,*/*/*);
ComprobarFormato(2 de junio de 2009,*de*de*);
ComprobarFormato(12345678-A,*-#);
O algo parecido, no he estudiado demasiado cómo especificar el formato, sólo he pensado en usar * para N caracteres y # para uno solo, estaría bien poder especificar si son letras o números.

Saludos y gracias por vuestro tiempo.