Deu certo.
Obrigado pela dica.
Pedro
________________________________
De: Ulisses <usl...@gmail.com>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 21 de Agosto de 2009 15:38:54
Assunto: Re: [delphi-br] Dúvida sobre campo DateTime
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...@yahoogrup os.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.ParamByN ame('DataInicio' ).AsDate: =
StrToDate(Edit5. Text) + StrToTime(Edit6. Text);
QRCadastro.ParamByN ame('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...@yahoogrup os.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.ParamByN ame('Matricula' ).AsString: = Edit2.Text;
>
> QRCadastro.ParamByN ame('DataInicio' ).AsDate: = StrToDate(Edit5. Text);
> QRCadastro.ParamByN ame('DataFim' ).AsDate: = StrToDate(Edit7. Text);
>
> QRCadastro.ParamByN ame('DataInicio' ).AsTime: = StrToTime(Edit6. Text);
> QRCadastro.ParamByN ame('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.maisbusca dos.yahoo. com
>
> [As partes desta mensagem que não continham texto foram removidas]
>
[As partes desta mensagem que não continham texto foram removidas]
____________________________________________________________________________________
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]
