Taschenrechner

[Enten Mann]

Hallo ich lerne grade Delphi und möchte mir eine Taschenrechner Programmieren, leider habe ich en Prob mit dem Input und was da rein soll.

Also ich möchte es so:

user drückt button
zahl erscheint

user drückt button
zeichen erscheint(+, -, *, etc)

user drückt button
nächste zahl erscheint

user drückt = button dann erscheint ergebnis

Wie mache ich das?

Ich schaffe das einfach nicht, hier mal mein Code.

Delphi-Quellcode:

unit Unit1; {Name der Unit}

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ExtCtrls;

type
  TForm1 = class(TForm)
    Image1: TImage;
    Image2: TImage;
    Image3: TImage;
    Image4: TImage;
    Image5: TImage;
    Image6: TImage;
    Image7: TImage;
    Image8: TImage;
    Image9: TImage;
    Image10: TImage;
    Image11: TImage;
    Image14: TImage;
    Image15: TImage;
    Image16: TImage;
    Image17: TImage;
    Image18: TImage;
    Image19: TImage;
    Image20: TImage;
    Image21: TImage;
    Image22: TImage;
    Edit1: TEdit;
    Image12: TImage;
    procedure Button1Click(Sender: TObject);
    private
      { Private-Deklarationen }
    public
      { Public-Deklarationen }
  end;

var
  Form1: TForm1; //Hier werden die Globalen Variablen definiert

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject); //Unser OnClick-Ereignis
var
  zahl1, zahl2, ergebnis: integer; //Unsere Variablen
begin
  zahl1:=StrToInt(Edit1.Text);
  zahl2:=StrToInt(Edit1.Text);
  ergebnis:=zahl1+zahl2;
  Edit1.Caption:=IntToStr(ergebnis);
end;

end.