Boa tarde! O Parâmetro tem que ser AsDateTime, caso contrário ele só vai considerar a parte inteira.
Boa sorte. Ulisses ----- Original Message ----- From: eliflaviob To: delphi-br@yahoogrupos.com.br Sent: Friday, August 21, 2009 9:00 AM Subject: [delphi-br] Dúvida sobre campo DateTime Pedro, um campo DateTime armazena a data na parte inteira e a hora na parte decima, portanto, faça apenas uma linha para armazenar a Data e a Hora, algo mais ou menos assim: QRCadastro.ParamByName('DataInicio').AsDate:= StrToDate(Edit5.Text) + StrToTime(Edit6.Text); QRCadastro.ParamByName('DataFim').AsDate:= StrToDate(Edit7.Text) + StrToTime(Edit8.Text); Porém, te aconselho a usar o componente TJvDateEdit da JVCL para edição de data e o TDateTimePicker do próprio Delphi para a hora. Eli --- Em delphi-br@yahoogrupos.com.br, Pedro Neves <neve...@...> escreveu > > Estou com a seguinte dificuldade: > > Estou tentando gravar a data e a hora no banco usando: > Begin > QRCadastro.Close; > QRCadastro.Sql.Clear; > QRCadastro.Sql.Add('Insert Into Tabela(Matricula, DataInicio, > DataFim)'); > QRCadastro.Sql.Add('Values(:Matricula, :DataInicio, :DataFim)'); > QRCadastro.ParamByName('Matricula').AsString:= Edit2.Text; > > QRCadastro.ParamByName('DataInicio').AsDate:= StrToDate(Edit5.Text); > QRCadastro.ParamByName('DataFim').AsDate:= StrToDate(Edit7.Text); > > QRCadastro.ParamByName('DataInicio').AsTime:= StrToTime(Edit6.Text); > QRCadastro.ParamByName('DataFim').AsTime:= StrToTime(Edit8.Text); > > QRCadastro.ExecSQL; > End > > > O campo no banco de dados é do tipo datetime e quando gravo a data dá > certo mas se comentar (//) a data e gravar a hora dá erro no banco. > Alguém sabe onde está o erro. > > > grato > > Pedro. > > > __________________________________________________________ > Veja quais são os assuntos do momento no Yahoo! +Buscados > http://br.maisbuscados.yahoo.com > > [As partes desta mensagem que não continham texto foram removidas] > [As partes desta mensagem que não continham texto foram removidas]