Fórum Diferenca de datas em CalcField #188925

15/10/2003

0

Tenho uma tabela com dois campos datas
Imagino não ser necessário criar nesta tabela um campo Qtd_Dias, porem preciso de um campo no form que me mostre a diferenca entre essas duas datas.

Este dbedit (ou edit!?) exibirá essa o registro for exibido;
O calculo da diferenca entre essas datas ocorrerá sempre que o 2º DBEDIT, perder o foco;

[b:9d491a5029]Alguem pode me dizer como posso fazer isso?
Por favor detalhe, ao explicar para eu entender o que estou fazendo.[/b:9d491a5029]
desde já agradeço...


Rafaelunp

Rafaelunp

Responder

Posts

15/10/2003

Marcio.theis

Use o componente Calendar do Delphi


Responder

Gostei + 0

16/10/2003

Rafaelunp

[quote:d6bb4056c5=´/]/]@t´]Use o componente Calendar do Delphi[/quote:d6bb4056c5]
:idea: :?: :? :?: :idea: :?
Amigo,

Não entendi como posso fazer isso....
Minha aplicação já está pronta... Gostaria apenas de acrescentar esse campo...
Estou usando interbase, com isso uso um dataset no form com os dados que vou trabalhar (inserir, alterar, excluir)... Pensei em criar um campo calculado no dataset para faze isso, mas nao estou conseguindo...

Por favor detalhe, ao explicar para eu entender o que estou fazendo.


Responder

Gostei + 0

16/10/2003

Adilsond

De um clique duplo sobre sua table/query, new field, coloque-o como integer e calculado.

No evento OnCalcField coloque:

if (tabeladata1.IsNull) or (tabeladata2.IsNull) then
tabelacampocalculado.value := 0
else
tabelacampocalculado.value := Trunc(tabeladata2.Value - tabeladata1.Value);


Responder

Gostei + 0

16/10/2003

Rafaelunp

De um clique duplo sobre sua table/query, new field, coloque-o como integer e calculado. No evento OnCalcField coloque: if (tabeladata1.IsNull) or (tabeladata2.IsNull) then tabelacampocalculado.value := 0 else tabelacampocalculado.value := Trunc(tabeladata2.Value - tabeladata1.Value);


Caro Adilson,

Obrigado pela ajuda, era o que estava imaginando que fosse resolver, mas ainda não está dando certo...
Sempre que vou fazer uma inclusão
(estou usando IBDataSet - IBDataSet1.Insert;)

Ele ativa o OnCalcField e retorna o ´0´ para o campo de ´dias´.
Gostaria de saber como posso fazer para que o calculo desses dias seja executado sempre que eu precisar, ou seja, sempre que a data 2 perder o foco, ou sempre que for salvar, ou sempre que houver uma alteralção...
Como posso fazer isso?
Acho que ainda não está funcionando completamente por causa disso.
Desde já agradeço...


Responder

Gostei + 0

16/10/2003

Rafaelunp

UP!

Preciso dessa resposnta, to precisando disso funcionando...

Grato,


Responder

Gostei + 0

16/10/2003

Rafaelunp

Aê Galera,

Deu certo aqui...

Era do jeito que adilson tinha dito mesmo!
Ficou primeira!


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar