Ir para conteúdo
Fórum Script Brasil
  • 0

Campo Data Aceita Null? (AUTORESOLVIDO)


jacsonsoares

Pergunta

Olá Pessoal !

Preciso inserir NULL em um campo data tipo "Date" ou "TimesTamp" em uma tabela local no paradox.

Estou usando o seguinte codigo:

  Query1.SQL.Clear;
  Query1.SQL.Text := ' insert into teste(obs,data) values(:pobs,:pdata);';
  Query1.ParamByName('pobs' ).AsString := 'teste';
  Query1.ParamByName('pdata').AsDate   := DateEdit1.Date;
  Query1.ExecSQL;

Não estou selecionando a data no componente porem ele insere as datas

"00:00:00, 30/12/1899" para TimesTamp e "30/12/1899" para Date, eu gostaria que fique null.

Alguém tem ideia de como fazer ??

Muito Obrigado!!

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0

biggrin.gif

Pessoal, tentei passar o datatype manualmente :

  Query1.Params[1].DataType   := ftDate;
Tambem não funcionaou ..... Mas ... A solcução de achei foi colocar a instrução "Insert ...." no objeto qry e deixar os s params tratados. Então o codigo para inserir ficaria assim:
  LimpaQry(Query1);
  Query1.ParamByName('pobs' ).AsString := 'teste';
  if Trim(DateEdit1.Text) <> '/  /' then
    Query1.ParamByName('pdata').Value    := DateEdit1.Date;
  Query1.ExecSQL;
se você não limpar o parametro ele repete o valor anteriormente usado. por isso crirei esta função que limpa a qry.
procedure TForm1.LimpaQry(Qry: TQuery);
var i: Integer;
begin
  qry.Close;
  for i:=0 to qry.Params.Count-1 do
    qry.Params[i].Clear;
end;

Valeu!!!

Link para o comentário
Compartilhar em outros sites

Visitante
Este tópico está impedido de receber novos posts.


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...