como gravar só o ano no sistema

Olá Pessoal Feliz 2007... a todos!Delphi7 - ADO Connection - BD ACCESSEstou desenvolvendo um sistema e preciso gravar apenas o ano corrente(2007) em um campo e a data tipo 02/01/2007 em outro campo.Isso de maneira automática.Como posso fazer isso?Sem usar SQL.