Pegar valor do dia

Delphi

10/06/2008

Olá Pessoal!

Sou novato em delphi, e estou desenvolvendo o sistema de Locadora do Luciano Pimenta, dei alguma incrementada, agora estou com um problema.
Tenho uma tabela de preços de locação onde temos os campos codigo, descriçao e valor_domingo, valor_segunda valor_terca etc..., o que preciso fazer é como pegar o valor correspondente ao dia da locaçao na tabela de precos? exemplo.
Vou efetuar uma locacao, hoje terça-feira, preciso pegar na tabela preço o campo valor_terca.
Alguem pode me dar uma ajuda?
Obrigado.


Fernandoaco

Fernandoaco

Curtidas 0

Respostas

Rvsantos

Rvsantos

10/06/2008

Olá,

Vc pode fazer o seguinte, o delphi tem uma função que é a DayOfWeek que retorna o dia da semana em formato de número, Dom = 1, Seg = 2, Ter = 3, Qua = 4, Qui = 5, Sex = 6 e Sab = 7. Vc pode verificar qual o dia da semana vc está fazendo a locação e buscar o valor correspondente ao preço na sua tabela. Exemplo:

if (DayOfWeek(Date) = 1) then
buscar_valor_de_domingo
else if (DayOfWeek(Date) = 2) then
buscar_valor_de_segunda
...

e assim por diante,

Att,

Ricardo Santos


GOSTEI 0
Fernandoaco

Fernandoaco

10/06/2008

Ricardo!

Valeu a dica.

Obrigado!


GOSTEI 0
POSTAR