Ayuda para insertar más de 8 caracteres desde ComboBox

[mkbro]

Hola,

Estoy creando un programa usando Delphi 2010 y firebird 2.5. En la base de datos tengo una columna con un check que es el siguiente:

Código SQL [-]
CONSTRAINT ch_Tip_Prestamo CHECK (Tip_Prestamo in ('DIARIO', 'SEMANAL', 'QUINCENAL', 'MENSUAL') )

Este campo lo inserto a través de un ComboBox (un TDBComboBox para ser exacto) el cual tiene las cuatro opciones anteriores, pero si selecciono la opción "QUINCENAL" me da un error porque reduce esta entrada a "QUINCENA", o sea 8 caracteres y de esa forma no cumple con el CHECK de la base de datos.

Me gustaría saber si hay alguna forma de solucionar este problema usando este mismo componente (combobox) y que me de los 9 caracteres que necesito.

Por cierto, hago la conección usando dbExpress, pero según puedo observar el problema se encuentra solamente en el combobox.

Gracias de antemano.