Frações de estacionamento

Delphi

03/02/2022

Olá! Meu primeiro post.
Sou iniciante em delphi
e gostaria muito de uma orientação.
Estou montando um soft para estacionamento.
A minha dúvida é: Como posso cobrar pela permanencia de um veículo estacionado calculando o valor da hora
baseado no tempo de permanência?
Exemplo: se o veiculo entrou no pátio ontem ás xx:xx horas ele deve pagar por R$ x,xx baseado em uma tabela já com o valor da hora?
eu já fiz um aqui encontrado na internet e funciona mas só calcula os valores baseando-se no tempo e não na data.
Se alguém puder ajudar
Raphael Pacheco

Raphael Pacheco

Curtidas 0

Melhor post

Raimundo Pereira

Raimundo Pereira

04/02/2022

Olá! Meu primeiro post.
Sou iniciante em delphi
e gostaria muito de uma orientação.
Estou montando um soft para estacionamento.
A minha dúvida é: Como posso cobrar pela permanencia de um veículo estacionado calculando o valor da hora
baseado no tempo de permanência?
Exemplo: se o veiculo entrou no pátio ontem ás xx:xx horas ele deve pagar por R$ x,xx baseado em uma tabela já com o valor da hora?
eu já fiz um aqui encontrado na internet e funciona mas só calcula os valores baseando-se no tempo e não na data.
Se alguém puder ajudar


Talvez ajude
https://www.devmedia.com.br/forum/calcular-tempo-de-fabricacao-entre-duas-datas-horas/297785

Uma opção para converter data e hora em segundos
Show Delphi » Data e Hora » Função para obter os segundos entre duas datas ou horas

Função para obter os segundos entre duas datas ou horas
uses
DateUtils;

É necessário declarar DateUtils.
Em versões mais recentes declare System.DateUtils.


// Função : SecondsBetween( DataHoraInicial, DataHoraFinal )
// Retorno: Integer

Exemplo de uso:

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(IntToStr( SecondsBetween(EncodeDate(2017, 5, 15), Date) ));
end;
GOSTEI 1

Mais Respostas

Raphael Pacheco

Raphael Pacheco

03/02/2022

Olá! Meu primeiro post.
Sou iniciante em delphi
e gostaria muito de uma orientação.
Estou montando um soft para estacionamento.
A minha dúvida é: Como posso cobrar pela permanencia de um veículo estacionado calculando o valor da hora
baseado no tempo de permanência?
Exemplo: se o veiculo entrou no pátio ontem ás xx:xx horas ele deve pagar por R$ x,xx baseado em uma tabela já com o valor da hora?
eu já fiz um aqui encontrado na internet e funciona mas só calcula os valores baseando-se no tempo e não na data.
Se alguém puder ajudar


Talvez ajude
https://www.devmedia.com.br/forum/calcular-tempo-de-fabricacao-entre-duas-datas-horas/297785

Uma opção para converter data e hora em segundos
Show Delphi » Data e Hora » Função para obter os segundos entre duas datas ou horas

Função para obter os segundos entre duas datas ou horas
uses
DateUtils;

É necessário declarar DateUtils.
Em versões mais recentes declare System.DateUtils.


// Função : SecondsBetween( DataHoraInicial, DataHoraFinal )
// Retorno: Integer

Exemplo de uso:

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(IntToStr( SecondsBetween(EncodeDate(2017, 5, 15), Date) ));
end;

Deu certo o exemplo que vc passou.
Já tenho o tempo de permanencia em horas com diferença entre datas.
Como faço para calcular o valor das horas baseado no resultado das horas ?
GOSTEI 0
Raimundo Pereira

Raimundo Pereira

03/02/2022


Raphael Pacheco,

Supondo que o valor da hora seja R$ 6,00
VH = Valor Hora R$ 6,00
Hora = 1 = 6,00
Minuto = 60 = 6,00 / 60 = Valor Minuto = R$ 0,10
1 Hora possui 3600 segundos = 6,00 / 60 /60 = Valor Segundo = R$ 0,001667

Apagar = Valor Segundo = R$ 0,001667 * = 3600 =R$ 6,0012

Basta usar uma das funções que passei anteriormente, ela retorna segundos entre duas datas e horas
Eu usaria este metodo, cobrando por segundos .
Minutos ou segundos, vai dar no mesmo.





GOSTEI 1
Raphael Pacheco

Raphael Pacheco

03/02/2022


Raphael Pacheco,

Supondo que o valor da hora seja R$ 6,00
VH = Valor Hora R$ 6,00
Hora = 1 = 6,00
Minuto = 60 = 6,00 / 60 = Valor Minuto = R$ 0,10
1 Hora possui 3600 segundos = 6,00 / 60 /60 = Valor Segundo = R$ 0,001667

Apagar = Valor Segundo = R$ 0,001667 * = 3600 =R$ 6,0012

Basta usar uma das funções que passei anteriormente, ela retorna segundos entre duas datas e horas
Eu usaria este metodo, cobrando por segundos .
Minutos ou segundos, vai dar no mesmo.

Muito obrigado!
Perfeito!




GOSTEI 0
POSTAR