Tipos enumarados, problemilla..

[blueicaro]

Hola si yo pongo esto en mi programa compila perfectamente:

Código Delphi [-]
 Type MisTipos = (Untipo,DosTipo,TresTipo);

Pero si pongo esto me da fallo al compilar

Código Delphi [-]
 Type MisTipos= (DI,DO,AO,AI);

Como es normal, se queja en DO, porque es una palabra reservada

¿Cómo puedo hacer para poder definir mi "propìos" tipos de datos, pudiendo usar una palabra reserva.

No sé si me explico

Gracias

Saludos

/BlueIcaro