Convertir la fecha 2009-12-31 a su equivalente en entero en delphi

[[cHackAll]]

Ok, no entiendo para que quieres convertirlo a un valor entero si en la BD estas usando un DateTime;
Qry_inserta.FieldByName('dArrivaldate').AsDateTime := IntToStr(Trunc(Ahora));

Esto obviamente no funciona puesto que seguramente tu tabla ha sido creada con el campo dArrivaldate como DateTime, y tu lo estas definiendo hacia un .AsDateTime. (lo que esta bien, pero es un campo DateTime)

Si dicho campo fuese un int, una solucion sería;

Código Delphi [-]
Qry_inserta.FieldByName('dwArrivalDay').AsInteger := IntToStr(Trunc(Now));

Saludos.