He encontrado el nombre de la función de la API. Esta se llama
CryptProtectData. En mi anterior respuesta había dicho que el encabezado de esta función no está implementado en Delphi. Tendrás que hacer su traducción si te interesa trabajar con ella.
También puedes leer sobre las APIs de encriptación ofrecidas por el SDK de Windows en
este enlace.
Saludos,
Chris