关于dbcompbox 的问题,,,急急急!!!在线等待!!请教大虾!!

本人刚学习delphi编程,用delphi6.0 做数据录入时用到一个dbcompbox组件,
用此组件显示性别,但为了加快录入速度,我在 onexit 事件中加入
if dbcompbox1.text:='1' then
dbcompbox1.text:='男';
if dbcompbox1.text:='0' then
dbcompbox1.text:='女';目的是录入1时为男,0时为女
当离开该组件时,确实输入1显示为男,0显示为女,但是插入到数据库中仍然是
1和0, 不知道是什么原因请各位高手帮助!!!!!!