[Delphi]Calculadora passoa a passo

[Marcin 1]

Fala galerinha, alguém está afim de fazer uma calculadora ?

 

Vamos lá!

 

1° passo:

 

Monte o visual do programa.

 

Ex:

 

 

Iremos precisar de:

 

.button (5)

.label (5)

.edit (3)

 

2° passo:

 

Vamos programar ?

 

*Renomeie o botão 1 para + ( 1° Quadro )

Na função onclick do botão (duplo click no botão), digite a seguinte linha de código:

 

edit3.text := floattostr(strtofloat(edit1.Text)+strtofloat(edit2.text));

 

*Renomeie o botão 2 para - ( 2° Quadro )

Na função onclick do botão (duplo click no botão), digite a seguinte linha de código:

 

edit3.text := floattostr(strtofloat(edit1.Text)-strtofloat(edit2.text));

 

*Renomeie o botão 3 para * ( 3° Quadro )

Na função onclick do botão (duplo click no botão), digite a seguinte linha de código:

 

edit3.text := floattostr(strtofloat(edit1.Text)*strtofloat(edit2.text));

 

*Renomeie o botão 4 para / ( 4° Quadro )

Na função onclick do botão (duplo click no botão), digite a seguinte linha de código:

 

edit3.text := floattostr(strtofloat(edit1.Text)/strtofloat(edit2.text));

 

*Renomeie o botão 5 para C ( 5° Quadro )

Na função onclick do botão (duplo click no botão), digite a seguinte linha de código:

 

edit1.clear;

edit2.clear;

edit3.clear;

 

* Em Negrito os componentes edit. *

* O comando clear apaga tudo que estiver escrito no componente edit. *

* O comando floattostr é usado para converter tudo que está dentro de parênteses ( de real para string ).

* O comando strtofloat é usado para converter tudo que está dentro do edit 1 e 2 ( de string para real ).

 

# O componente edit recebe valor string ( conjunto de caractéres ), então você não pode colocar números diretamente nele pois o Delphi ve apenas como texto. #

 

| edit3.text := floattostr(strtofloat(edit1.Text)+strtofloat(edit2.text));

 

edit3 recebe a resposta.

edit1 e edit2 recebem os valores a serem somados.

 

Nesta linha de programação acontece o seguinte:

 

O componente edit3 recebe um valor := este valor é tranformado de real para string, dentro do parenteses tanto o componente edit1 quanto o edit 2 são transformados de tring para real ( para poderem somar os valores que depois são convertidos para string, sendo recebido pelo edit3). |

 

Labels: Você deve renomear a seu gosto, siga o exemplo dado na ss.

 

Espero que gostem.

 

Dúvidas e Sugestões Aqui!

 

Até.

 

Marcin!

[Tairone 0]

Marcin,

 

Muito bom o Tutorial, bem explicado,cheio de cores.

 

Obrigado pela contribuição :]

 

 

[Marcin 1]

Valeu tio, pena que ninguém mais comenta =(

bua bua, faz parte. ^^

Assim que der tempo posto mais coisas.

 

Até.

[thenick 0]

Muito bom Vei:style:

[MalFoY 0]

Muito bom.. valew

 

A minha funcionou certinho ! (Y)

[Bernaz 0]

Cara que troço complicado, Me dá aulas pelo MSN? uhahuaua!

 

Não entendo nada, mas deve estar bem feito ^^

 

Bernaz

[usglordelo 0]

a que eu fiz nao era assim nao, era q nem calculadora mesmo, com visor e vc clicando na techa dos numeros e das operacoes, tinha C, CE e BCK(Backspace)..

So q apareceu uns bugs e to sem paciencia pra corrigir xD

[Deragon 25]

;o

nice

perfect

funcionou

vlw cara...

não tem como adicionar raíz aí ? =D

[usglordelo 0]

Vou disponibilizar pra donwload a calculadora q eu fiz.

Ela esta ainda com alguns bugs que nao to com saco pra corrigir, dai se alguem se interessar e quiser corrigir xD...

 

http://campusvirtual.unifacs.br/moodle/file.php/423/moddata/assignment/136/2594/calculadora.zip

[Bajt 0]

Valeu, pegou direitinho aqui .