REVELAR

Fórum iniciar no delphi : dúvidas #327480

15/08/2006

0

boa tarde pessoal, bem estou iniciando a programar em dhelphi.

consegui fazer uma calculadora simple com 4 funçoes, porém há algumas falhas:

usei 3 caixas de texto, uma para o 1º valor, outra para o 2º e o último para o resultado, para isto usei o botão ´edit´ da guia ´standard´. na guia ´propriedades´ do ´objet inspector´ para ´name´ usei txtvalor1 2 e 3 sucessivamente para os 3 e para text <vazio> para os três.
para os botões das operações usei o seguinte código para os 4:

++++++++++++++++++++++++++++++++++++++
procedure TForm1.Button1Click(Sender: TObject);
var v1,v2,v3:real;
begin
v1 := strtofloat(txtvalor1.text);
v2 := strtofloat(txtvalor2.text);
v3 := v1+v2;
txtvalor3.text := floattostr(v3);
end;
+++++++++++++++++++++++++++++++++++++++
muda apenas, é lógico, os operadores v3 = v1 + v2, v3 = v1 - v2 e sucessivamente.


este projeto da simples calculadora funcionou, todavia, gostaria de eliminar algumas falhas existentes:
1º caixa de texto vazio.
2º divisão por zero.

e Alterar o código para que não seja necessário criar variáveis nos códigos dos eventos dos botões (soma, subtração, divisão e multiplicação)

e Alterar o código para que as operações possam ser realizadas em apenas uma caixa de texto, assim como em uma calculadora comum.


também gostaria de saber diferenciar o chamado “Tempo de Projeto” de “Tempo de Execução.


desde já agradeço a atenção de pelo menos lerem este assunto.


Jfm_one_one

Jfm_one_one

Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar