Concatenar Data e Hora de um DateTimePicker

21/12/2015

14

Bom dia,
Estou utilizando o componente DateTimePicker do Delphi 7 e vi que você só consegue pegar valores ou de data ou de hora (propriedade Kind). Quero utilizar 2 DateTimePickers um para data e outro para hora, mas como consigo pegar o date de um e concatenar com o time do outro para enviar como parâmetro p/ uma query? No banco o tipo é DateTime

Desde já agradeço.
Responder

Post mais votado

21/12/2015

procedure TForm1.btn1Click(Sender: TObject);
var
  data: String;
  hora: string;
begin
  data := FormatDateTime('DD/MM/YYYY', dtp1.DateTime);
  hora := FormatDateTime('hh:mm:ss',   dtp2.DateTime);

  ShowMessage(data + ' ' + hora);
end;
Responder

Mais Posts

Muitíssimo obrigado....funcionou perfeitamente
Responder