uso de DateTimePicker1

[Palmiro]

Hola...
si usas un DataSet la sentencia que te escribo a continuacion puede que te sea util...
Esto para cargar desde DataTimePiker...


Código Delphi [-]
procedure TfrmPersonaCelula.dtpFecNacChange(Sender: TObject);
begin
if frm.DataSetPersona.State in [dsEdit, dsInsert] then
DtModulo.qryPersonaFecNac.Value := dtpFecNac.Date;
end;





Es es en centido contrario...


Código Delphi [-]procedure TfrmCelula.FormShow(Sender: TObject);
begin
if frmPersona.dataSetPersona.State in [dsEdit] then
dtpFecNac.DateTime:= DtModulo.qryCelulasCelFecNac.AsDateTime;
if frmPersona.dataSetPersona.State in [dsInsert] then
dtpFecNac.DateTime:= Date;
end;




Despues tienes mas variantes de uso, pero eso lo va usar de acuerdo a como este cargando los datos...