Guardar la fecha de un TDatetimePicker en una base de datos
 

Saludos, soy nuevo en esto y estoy trantando de hacer un pequeña aplicación y tengo varios problemas el primero es que quiero guardar la fecha de un datetimepicker en mi BD, y el otro es que quiero halar de un tabla unos datos para guardarla en otra.

por ejemplo la tabla cliente, traer el ID_ del cliente y q con eso me traiga el nombre y ha si poder guardalo en la otra base de datos.

se los agradeceria mucho, Vida o Muerte.:confused:

Hola,

Cuestión de "vida o muerte" o muerte es que leas la guía de los foros: tratar cada tema en hilos separados y titular los hilos descriptivamente ayuda a la comunidad, dicho de otro modo, lo contrario no ayuda, por no decir que perjudica.

Por lo pronto voy a renombrar el título de este hilo para que tenga "algo que ver" con el primer tema que tocas. Y, respecto a lo que planteas, sería bueno saber qué motor de bases de datos estás utilizando.

Ensaya lo siguiente para la primera pregunta, para la segunda pregunta como dice David es necesario conocer mas detalles para poderte ayudar.

Código Delphi [-]
unit MiUnit;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, DBTables, ExtCtrls, DBCtrls, ComCtrls, StdCtrls, Mask;

type
  TForm1 = class(TForm)
    Table1: TTable;
    DataSource1: TDataSource;
    Table1Fecha: TDateTimeField;
    DateTimePicker1: TDateTimePicker;
    procedure DataSource1DataChange(Sender: TObject; Field: TField);
    procedure DataSource1UpdateData(Sender: TObject);
    procedure DateTimePicker1Change(Sender: TObject);
    procedure DateTimePicker1Exit(Sender: TObject);
  private
    FCambiandoFecha: Boolean;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
begin
  if not FCambiandofecha then
  try
    FCambiandoFecha := True;
    DateTimePicker1.Date := Table1Fecha.Value;
  finally
    FCambiandoFecha := False;
  end;
end;

procedure TForm1.DataSource1UpdateData(Sender: TObject);
begin
  Table1Fecha.Value := DateTimePicker1.Date;
end;

procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
  if not FCambiandoFecha then
  try
    FCambiandoFecha := True;
    DataSource1.Edit;
  finally
    FCambiandoFecha := False;
  end;
end;

procedure TForm1.DateTimePicker1Exit(Sender: TObject);
begin
  if dataSource1.State in dsEditModes then
    Table1.UpdateRecord;
end;

end.

Pues yo diria que no es muy claro lo que dices :confused: una cosa es guardar una fecha en la base de datos, ¿sabes guardar siquiera un dato? y eso de pasar datos de tabla a tabla, en que tienes problema :confused:

perdon por el asunto
 

Saludos,

Se que exagere con el asunto de vida o muerte, pero es algo para la recepcion de los documentos de mi empresa bueno el caso con lo de los datos estoy usando la standar de delphi paradox, y a ver si me doy a enter mejor lo que quiero es hacer en forma como si fuera una factura que traes el cliente ya creado por algun ID asignado en la tabla cliente y luego que llenas todos los campos los grabas en la tabla de factura, putualmente como traigo a ese formulario el dato ID_cliente, y Nombre de cliente de la tabla cliente para grabarlo en la tabla factura por ejemplo.

el codigo me da un error
 

Saludos,

el codigo me da un error que me dice que no puede pasarle un valor nulo al campo, me imagino que sera por que estoy usando paradox y es un campo de tipo fecha