Calcular Año (condición cíclica)

[MaMu]

Resulta que tengo un orden de equivalencias entre una Letra y su correspondiente Año, el cual se va repitiendo a lo largo de la historia.
Empieza con la letra K en el años 2000.

Código Delphi [-]
K=2000
L=2001
M=2002
N=2003
P=2004
R=2005
S=2006
T=2007
V=2008
X=2009
Z=2010
A=2011
B=2012
C=2013
D=2014
E=2015
F=2016
H=2017
J=2018
 
//y asi suscesivamente...
 
K=2019
L=2020
... etc.

Pero no se me ocurre como hacer, para que introciendo una variable "año", me devuelva la Letra del año que correspode, segun el orden cíclico establecido

Código Delphi [-]
 
anio:='2007';
//anio:='1995';
//anio:= .....  etc
QueAnio:=LetraAnio(anio);

Realmente no se me ocurre que hacer.

Saludos y Gracias