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 

problema grave com calculadora

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


Registrado: Sexta-Feira, 10 de Mai de 2013
Mensagens: 17

MensagemEnviada: Sex Mai 10, 2013 2:40 am    Assunto: problema grave com calculadora Responder com Citação

eu fiz tudo certo mas quando eu vo soma um valor grande tipo 9999999999999999999999999999 o meu programa da erro
olha aqui como eu fiz

procedure TForm1.Button1Click(Sender: TObject);
Var
A,B,C: Int64;
begin
A:= StrToInt64(Edit1.Text);
B:= StrToInt64(Edit2.Text);
C:= A+B;
Label1.Caption:= IntToStr(C);
end;

end.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
faccruz
Colaborador
Colaborador


Registrado: Terça-Feira, 20 de Julho de 2010
Mensagens: 1563

MensagemEnviada: Sex Mai 10, 2013 8:26 am    Assunto: Responder com Citação

Qual erro?
_________________
Facc System - Sistemas para Computador
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário
felipekk
Colaborador
Colaborador


Registrado: Quinta-Feira, 5 de Janeiro de 2012
Mensagens: 1531
Localização: Pirapora - MG

MensagemEnviada: Sex Mai 10, 2013 10:26 am    Assunto: Responder com Citação

Bom dia,
ja que vc esta usando o tipo int64 como variável acho que na conversão também tem que ser usado.
Segue:
Código:
procedure TForm1.Button1Click(Sender: TObject);
Var
A,B,C: Int64;
begin
A:= StrToInt64(Edit1.Text);
B:= StrToInt64(Edit2.Text);
C:= A+B;
Label1.Caption:= Int64ToStr(C);
end;

end.

Espero que ajude.
Abraços.
_________________
"Esteja ligado em melhora contínua: hoje melhor do que ontem e pior do que amanhã."


Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
luizcarlosjunior
Novato
Novato


Registrado: Sexta-Feira, 10 de Mai de 2013
Mensagens: 17

MensagemEnviada: Sex Mai 10, 2013 1:50 pm    Assunto: Responder com Citação

o erro é esse: '99999999999999999999999999999999999999' is not a valid integer value

aqui não ta funcionando o Int64ToStr , fica dando undeclared identifier
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
felipekk
Colaborador
Colaborador


Registrado: Quinta-Feira, 5 de Janeiro de 2012
Mensagens: 1531
Localização: Pirapora - MG

MensagemEnviada: Sex Mai 10, 2013 2:14 pm    Assunto: Responder com Citação

Só uma pergunta vc ta somando quais valores?
Acho que seria melhor colocar como double a variável.
Pois pode ocasionar de ter resultados com números decimais.
_________________
"Esteja ligado em melhora contínua: hoje melhor do que ontem e pior do que amanhã."


Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
luizcarlosjunior
Novato
Novato


Registrado: Sexta-Feira, 10 de Mai de 2013
Mensagens: 17

MensagemEnviada: Sex Mai 10, 2013 4:55 pm    Assunto: Responder com Citação

eu to somando 99999999999999999999999999999999999 + 99999999999999999999999999999999999

com double o resultado fica mt estranho, olha só ele:

2E 35
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
felipekk
Colaborador
Colaborador


Registrado: Quinta-Feira, 5 de Janeiro de 2012
Mensagens: 1531
Localização: Pirapora - MG

MensagemEnviada: Sex Mai 10, 2013 5:04 pm    Assunto: Responder com Citação

Desculpe a pergunta mais essa soma serve pra que?
_________________
"Esteja ligado em melhora contínua: hoje melhor do que ontem e pior do que amanhã."


Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
CesarRocha
Mestre
Mestre


Registrado: Segunda-Feira, 30 de Mai de 2011
Mensagens: 794
Localização: São Paulo - SP

MensagemEnviada: Sex Mai 10, 2013 5:09 pm    Assunto: Responder com Citação

O valor simplesmente não está cabendo na variável. Lembra-se que cada variável pode suportar até n bits?

Sobre o double, não está "estranho". Ele simplesmente colocou em notação cientifica...

~
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
luizcarlosjunior
Novato
Novato


Registrado: Sexta-Feira, 10 de Mai de 2013
Mensagens: 17

MensagemEnviada: Sex Mai 10, 2013 5:25 pm    Assunto: Responder com Citação

é pq eu queria fazer uma calculadora sem erros, mas eu não consigo somar esses numeros grandes
tem algum outro jeito???
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
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