Calculadoras no Delphi 7

Caculadora de Soma:
Tutorial:

Crie um novo Form
No form coloque 1 botão e 3 Edit

posicione nesta ordem:
Edit1
Edit2
Edit3
Botão

Tire o Texto dos 3 Edit
Mude o Text do Botão para o nome de +
clique 2 vezes no botao apague tudo que tiver e digite :

Código:

procedure TForm1.Button1Click(Sender: TObject);
var
A : Real;
B : Real;
C : Real;
begin
A := StrToFloat(Edit1.Text);
B := StrToFloat(Edit2.Text);
C := a + b;
edit3.Text:= FloatToStr(c);
end;

end.

Depois de um f9 ou clique em play e é so testar.

Caculadora de Multiplicação
Tutorial:

Faça o procedimento que o anteriror so mude:

Código:

C := a * b;

Caculadora de Divisão
Tutorial:

Faça o procedimento que o anteriror so mude:

Código:

C := a / b;

Caculadora de Subtração
Tutorial:

Faça o procedimento que o anteriror so mude:

Código:

C := a - b;