Código Delphi [-] tfecha:tdatetime; tfecha:=dtpdesde.date; replacetime(tfecha,encodetime(0,0,0,0)); dtpdesde.date:=tfecha;
tfecha:tdatetime; tfecha:=dtpdesde.date; replacetime(tfecha,encodetime(0,0,0,0)); dtpdesde.date:=tfecha;