Tutorial de Delphi Nº 2

Calculadora em Delphi

Em primeiro lugar, obrigado por visitar o meu blog. :)

Nesta aula vamos aprender a criar uma calculadora em delphi.

Além de executar o cálculo, vamos deixar a tela com fundo azul quando o resultado for positivo e vermelho, quando o resultado negativo.

Vamos começar criando um novo projeto. File -> New -> Applcation.

Redimensione a tela de forma que fique com o tamanho mais ou menos como o da imagem abaixo.

ps: O tamanho da tela indefere, pode ser o tamanho de sua preferência.

Pressione a tecla F11 no teclado para visualizar as propriedades da tela.

E altera as propriedades

biMaximize = False

BorderStyle = bsSingle

conforme a imagem abaixo:

Adicione os botões na tela, conforme a 1ª imagem deste tutorial.

Os botões devem ter os nomes:

BtnAd = Botão de Adição.

BtnMn = Botão de Subtração

BtnDiv = Botão de Divisão

BtnMlt = Botão de Multiplicação

BtnIg = Botão IGUAL

BtnPt = Botão de separação decimal

Btn0 = Botão número zero.

Btn1 = Botão número um.

Btn2 = Botão número dois.

Btn3 = Botão número três.

Btn4 = Botão número quatro.

Btn5 = Botão número cinco.

Btn6 = Botão número seis.

Btn7 = Botão número sete.

Btn8 = Botão número oito.

Btn9 = Botão número nove.

Vamos criar algumas variáveis para usarmos depois no código:

var

  Calc_On: TCalc_On;

  Valor: Real;

  Operacao: Integer;

  ValorInteiro: Integer;

Conforme imagem abaixo:

Este post, ainda não está concluído...aguarde.