problemas con dato fecha

[elgauchopablo]

hola gracias por responder ahi te paso las lineas con las q cargo los datos.

Código Delphi [-]
procedure TFcarga.BgrabarClick(Sender: TObject);
begin
  with DB.Tafiliados do
  begin
    Active := true;
    Db.Tafiliados.Insert;
    CachedUpdates := true;
    db.Tafiliados.fieldByname('apeynombre').AsString := Eapeynom.Text;
    db.Tafiliados.fieldByname('fn').AsDateTime := dtpfn.Date;
    db.Tafiliados.fieldByname('nacionalidad').AsString := Enacion.Text;
    db.Tafiliados.fieldByname('estadocivil').AsString :=Cestadocivil.Text;
    db.Tafiliados.fieldByname('dni').AsInteger :=StrToint(Edni.Text);
    db.Tafiliados.fieldByname('establecimiento').AsString:= Eestableci.Text;
    db.Tafiliados.fieldByname('categoria').AsString := Csiprosa.Text;
    db.Tafiliados.fieldByname('leg').AsInteger :=StrToInt(Elegajo.Text);
    db.Tafiliados.fieldByname('profesion').AsString:= Eprofesion.Text;
    db.Tafiliados.fieldByname('situacionderevista').AsString:= Crevista.Text;
    db.Tafiliados.fieldByname('domicilio').AsString:= Edomicilio.Text;
    db.Tafiliados.fieldByname('telefono').AsInteger:= StrToInt(Etelf.Text);
    db.Tafiliados.fieldByname('email').AsString:= EEmail.Text;
    db.Tafiliados.fieldByname('fechaalta').AsDateTime:=DateFalta.Date  ;
    db.Tafiliados.post;
    ApplyUpdates;
  end;
end;

saludos Pablo

[ecfisa]

Hola Pablo.

Como a todos los recién ingresados te invitamos a que leas nuestra Guía de estilo.

Te comento que encerrando tu código Delphi entre las etiquetas [delphi] [/delphi] , respetará la identación y el remarcado de la sintáxis del editor Delphi, dando mayor legibilidad. Ya las agregué a tu mensaje y como verás está más entendible.
Bueno nada más que esas sugerencias...

En cuanto a tu consulta, ya veo que estas en buenas manos así que: Bienvenido al Club Delphi

[[Caral]]

Hola
Parece que las dos fechas que tienes en la BD son, la de nacimiento y la de alta.
Las dos según parece son obtenidas de un datetimepicker cada una.
Las dos, supongo se inicializan (date.now).
Lo raro es que solo una de ellas de problemas ya que parece que esta bien el codigo.
Yo revisaría si hay algún otro codigo que afecte y el tipo de campo.
Saludos

[elgauchopablo]

Hola donde deberia inicializar las fechas? puede ser que no este haciendo eso.


Muchas gracias por contestar saludos

[[Caral]]

Hola
Normalmente el datetimepicker se inicia, osea, se coloca la fecha en NOW para que siempre quede actualizado este componente.
Eso se puede hacer en cualquier evento, podria ser en el evento oncreate el form.
Lo que haces es implemente poner el nombre del datetimepicker seguido de now, algo asi:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
 dtpfn.DateTime := Now;
 DateFalta.DateTime:= Now;
end;

No se si sera lo que genera el error.
Saludos

[cubanbaker]

Yo probé el código y me funciona bien... No me genera ningún error, al menos lo que publicaste. Incluso sin actualizar el datetimepicker. El error no debe estar ahí.
Le has caío atrás al error? Prueba el debug a ver...

[elgauchopablo]

hola, recien me doy cuenta, puede ser por q estoy trabajando bajo win 7 ? gracias por contestar saludos