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;

Belo TUTORIAL ;D

UHU!

Fear escreveu:Belo TUTORIAL ;D

UHU!

Você mexe em Delphi7?

Legal o TUTO NE
...

ola pessoal eu jogo o tt br a anos mas ele vai acabar dia 31 de agosto mais eu to um pouco feliz pq vo fala com terra sobre o tt br ai se acabo mesmo vo pago o de ingles é muito lgl tem laço tem sapatos ect, é surpe diverdidao mais se vc quer pago tem 9 e 95 ou 46:95 e 76:95 ta barato em mais ou menos ne to feliz mais o pior é a minha gata sofia q vai excluir ela os hackes venceram foi muito triste mais vo fazer otra bem bonita ok ate mais vo dar bjs para o xerife meu amigao e polly a sofia o percy pra familha dela pra princesa vivi para todos q eu amo de verdade bom espero q eu encontrem todos os meus amigos do tt br bom essa foi minha mensagem ate + foi bom conhece vcs bjs assinado lyyna

Adivertida..Esssa mensagen deveria ser postada na area de assuntos diversos,..
Edit:admin