Guardar AÑO campo tipo Fecha

[koalasoft]

Buenas .. tengo un detalle ..

Intento guardar en una tabla paradox un campo (AÑO) solamente, este esta dentro de un combobox (1980,1981,1982,etc) y tengo el siguiente codigo intentando guardarlo en la tabla.

Var ANIO: TDateTime;

Begin
ANIO:= StrToDate(Combobox1.Text);
ShortDateFormat := 'yyyy';

Table1.Insert;
Table1.FieldByName('ANIO_CONST').AsDateTime:= ANIO;
Table1.Post;
End;


En la tabla el campo ANIO_CONT lo tengo declarado de tipo DATE. con que fin? .. para quemas adelante cuando haga una busqueda pueda indicar que registro existen entre un rango de años.

Mi detalle es que no guarda el campo en la tabla marcandome error. algun comentario y corrección?

[oscarac]

q error te sale?

[cloayza]

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.


Var
Ano_Fecha: TDateTime;
Ano_Integer:Integer;
Begin
Ano_Integer:=StrToInt(Combobox1.Text);

Ano_Fecha:= Now(); //Formato del campo ->dd/mm/yyyy

Table1.Insert;
Table1.FieldByName('ANIO_CONST').AsDate:= Ano_Fecha;
Table1.FieldByName('ANIO_INTEGER').AsInteger:= Ano_Integer;
Table1.Post;
End;


Saludos cordiales

[Neftali [Germán.Estévez]]

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.

+1

Cualquier otra cosa, sólo te va a dar problemas de conversión y a la hora de visualizar los datos.