Ver Mensaje Individual
  #3  
Antiguo 10-02-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola Richard Mejia.

Cita:
lo que quiero es que cuando seleccione la fecha en el MaskEdit se guarde en la BD en el Campo Fecha que tengo, y que se me guarde la hora que digite en el DateTimerPicker
A ver si entendí bién... tenés un TDataSet con un mínimo de dos campos: Fecha y Hora del tipo correspondiente.
Para ingresar la fecha usas un TMaskEdit y para ingresar la hora un TDateTimePicker. En algún evento deberías asignar los valores del MaskEdit y DateTimePicker a los campos del TDataSet.

Como para darte una idea de cuales eventos podrías usar, te pongo dos ejemplos; para ambos doy por sentado que el DataSet ya está en modo edición. ( DataSet.Edit )

Modo 1: (evento OnClick de un TButton)
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  DataSet.FieldByName('FECHA').AsDateTime:= StrToDate(MaskEdit1.Text);
  DataSet.FieldByName('HORA').AsDateTime:= DateTimePicker1.Time;
end;

Modo 2: (eventos OnExit del MaskEdit y DateTimePicker)
Código Delphi [-]
procedure TForm1.MaskEdit1Exit(Sender: TObject);
begin
  DataSet.FieldByName('FECHA').AsDateTime:= StrToDate(MaskEdit1.Text);
end;

procedure TForm1.DateTimePicker1Exit(Sender: TObject);
begin
   DataSet.FieldByName('HORA').AsDateTime:= DateTimePicker1.Time;
end;


Un saludo.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita