como iniciar el DBDateTimePicker con la fecha actual

[hkromo]

Hola a todos:

Una de las formas para colocar la fecha actual a un componente vinculado es en el momento de crear un nuevo registro y esto se hace en el evento OnNewRecord del dataset que este utilizando, ejemplo:

procedure Tfrmpresupuesto.mtencNewRecord(DataSet: TDataSet);
begin
mtencFECHA.AsDate := Date;
end;


esto sin importar que componente este vinculado al campo.
Es de mucha utilidad este evento, ya que por el se puede inicializar muchos valores por defecto. Otra es segun el tipo de motor que se este utilizando se deja por defecto un valor inicial o un disparador al insertar para cambiar dicho valor.