koalasoft si tu campo está definido como Date o Datetime, lo que espera es un valor en formato fecha o fecha y hora...
Ahora si tu solo quieres almacenar el año solo debes definir tu campo como entero.
Código Delphi
[-]
Var
Ano_Fecha: TDateTime;
Ano_Integer:Integer;
Begin
Ano_Integer:=StrToInt(Combobox1.Text);
Ano_Fecha:= Now();
Table1.Insert;
Table1.FieldByName('ANIO_CONST').AsDate:= Ano_Fecha;
Table1.FieldByName('ANIO_INTEGER').AsInteger:= Ano_Integer;
Table1.Post;
End;
Saludos cordiales