Rechenprogramm

[Tarry]

Zitat von dtos:

Kann mir jemand ein Tutorial geben wie ich das hier verwirklichen kann ? (Bild)

Ja, ...

Das ist im Grunde das selbe, wenn du auf die Buttons klickst, dann musst du die Zahl einfach an den "Text" in dem Editfeld "dranhängen":

Delphi-Quellcode:

procedure TForm1.bt3Click(Sender: TObject);
begin
edZahl.Text := edZahl.Text + '3'
end;

beim klicken auf einen "Rechenbutton" musst du die erste Zahl in einer Variablen speichern, die Rechenart und das Feld leeren:

Delphi-Quellcode:

MeineIntegerVariable := StrToInt(edZahl.Text);
MeineAndereIntegerVariable := 1;    // z.B 1 für +, 2 für -, 3 für + und 4 für /
edZahl.Text := '';

Dann gibt der Nutzer die zweite Zahl ein und wenn er dann auf "=" klickt musst du nur die erste, gespeicherte Zahl mit der anderen zusammenrechnen, je nach dem worauf er vorher geklickt hat.

Delphi-Quellcode:

case  of
1: IntToStr(MeineIntegerVariable + StrToInt(edZahl.Text));
2: ...
3: ...
4: ... // bei Geteilt ("/") darfst du das Round() nicht vergessen, wenn du nur ganze Zahlen haben möchtest
else ShowMessage('Sie müssen erst auf ein Rechenzeichen klicken'); // Der Benutzer hat auf kein Zeichen vorher geklickt
end;
MeineIntegerVariable := 0;
MeineIAndereIntegerVariable := -1;

Gruß
Tarry