 |
ActiveDelphi
.: O site do programador Delphi! :.
|
| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
m2computer
Novato
Registrado: Sexta-Feira, 9 de Fevereiro de 2007
Mensagens: 69
|
 Enviada: Ter Jan 15, 2008 10:40 am Assunto: convertendo campo inteiro para data |
 |
|
Pessoal, possuo um banco firebird com muitos registros e estou com certa dificuldade de montar um relatório com o campo data da tabela documentos que está como inteiro no banco e no formato yyyymmdd p.e 20061212, gostaria de fazer esse valor aparecer nos relatórios no formato dd/mm/yyyy p.e 12/12/2006 e o campo valor tb está no formato 32,0253656521 esse gostaria alterar a precisão em tempo de execução.
agradeço desde já a atenção |
|
| Voltar ao Topo |
|
 |
joemil
Moderador
Registrado: Quinta-Feira, 25 de Março de 2004
Mensagens: 9100
Localização: Sinop-MT
|
| Enviada: Ter Jan 15, 2008 11:00 am Assunto: |
|
|
1. a data (inteiro) vc converte primeiro pra string e depois para data:
| Código: | Texto := Table1.FieldByName('data').AsString;
Data := StrToDate(Copy(Texto, 7,2)+'/'+Copy(Texto, 5,2)+'/'+
Copy(Texto, 1,4);
|
2. o valor, vc multiplica por 100 (2 casas):
| Código: | Valor := Trunc(Table1.FieldByName('valor').Value * 100))/100;
ou
Valor := Round(Table1.FieldByName('valor').Value * 100))/100;
|
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/ |
|
| Voltar ao Topo |
|
|
|
|
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.
|
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
