ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Calcular diferença entre 2 horarios campo varchar

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
karlosrapanui
Profissional
Profissional


Registrado: Terça-Feira, 29 de Agosto de 2006
Mensagens: 538

MensagemEnviada: Seg Ago 13, 2018 3:28 pm    Assunto: Calcular diferença entre 2 horarios campo varchar Responder com Citação

Tenho um campo chamado HorInicio e HorFinal, os 2 varchar(4) onde os dados são gravados da seguinte maneira

HorInicio : 0700
HorFinal : 1600

Tenho um outro campo chamado DurJornada onde tenho que pegar os 2 campos HorFinal e calcular a diferença em MINUTOS para o campo HorInicio, lembrando que o campo DurJornada é inteiro, isso antes de gravar na tabela.

Alguem tem uma ajudinha porque o cerebro bugou....rs**

Valeu pessoal

Utilizo D7 / Firebird 2.5
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
JoaoSHi
Experiente
Experiente


Registrado: Segunda-Feira, 25 de Agosto de 2008
Mensagens: 483

MensagemEnviada: Seg Ago 13, 2018 7:03 pm    Assunto: Responder com Citação

Colega, vê se ajuda:

Código:
procedure TForm1.Button1Click(Sender: TObject);
begin
  edit3.Text := IntToStr(MinutesBetween(StrToTime(edit2.Text),StrToTime(edit1.Text)));
end;



Edit1.text e Edit2.text devem estar formatados (07:00, 16:00);
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
johnny-walker
Moderador
Moderador


Registrado: Sábado, 4 de Outubro de 2003
Mensagens: 10653
Localização: Contagem/MG - BRAZIL

MensagemEnviada: Ter Ago 14, 2018 8:28 pm    Assunto: Responder com Citação

Tenta isto:

http://www.activedelphi.com.br/forum/viewtopic.php?p=293240&sid=c733bd90efaca73ae33d4931ee4d045b



bye
_________________
P.O.W.E.R B.Y D.E.L.P.H.I
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB