Taschenrechner programmieren! Bitte helft mir

[Lyrice]

Hallo liebe Mitglieder.
Ich habe ein mega großes Problem. Wir sollen bis nächte Woche selbst ein Programm erstellen in Delphi und ich bin eine absolute niete in programmieren.
Könnt ihr mir bitte helfen?

Dies ist meine folgende Aufgabe:
Schreiben Sie ein Programm, das einen einfachen Taschenrechner simuliert. Der Rechner soll mindestens die 4 Grundrechenarten, Wurzelziehen und quadrieren beherrschen, für die eingabe von mausbutton in der gewohnten Anordnung zur Verfügung stehen, die Tasteneingabe soll ebenfalls möglich sein.


und so weit bin ich schon:

Delphi-Quellcode:

procedure TForm1.Button5Click(Sender: TObject)
begin
close
end

procedure TForm1.Button1Click(Sender: TObject)
var z1, z2, ergebnis : rea
begin
z1:=strtofloat(Edit1.Text)
z2:=strtofloat(Edit2.Text)
ergebnis:=z1+z2
edit3.Text:=floattostr (ergebnis)


end;

procedure TForm1.Button2Click(Sender: TObject)
var z1, z2, ergebnis:real
begin
z1:=strtofloat(Edit1.Text)
z2:=strtofloat(Edit2.Text)
ergebnis:=z1-z2;
edit3.Text:=floattostr (ergebnis)


end;

procedure TForm1.Button3Click(Sender: TObject)
var z1, z2, ergebnis :real
begin
z1:=strtofloat(Edit1.Text)
z2:=strtofloat(Edit2.Text)
ergebnis:=z1*z2;
edit3.Text:=floattostr (ergebnis)
end;

procedure TForm1.Button4Click(Sender: TObject)
var z1,z2, ergebnis:real
begin
z1:=strtofloat(Edit1.Text)
z2:=strtofloat(Edit2.Text)
ergebnis:=z1/z2;
edit3.Text:=floattostr (ergebnis);
end;

end.

was muss ich schreiben wenn ich wurzel und quadrien machen möchte? und dass wenn ich im edit 1 meine zahlen eingebe, soll das automatisch zu edit 2 wechseln... wie geht das? was muss ich schreiben? bitte helft mir.würde euch sehr dankbar sein.
Danke , Lucy

[edit=Phoenix]Delphi-Tags eingefügt. Bitte mal anschauen und das nächste mal selber richtig machen. Mfg, Phoenix[/edit]

[Phoenix]

1.) Du musst [ delphi ]...[ /delphi ] in Deinem Beitrag um den Quellcode rum schreiben.

Dazu drückst Du bitte oben rechts über Deinem Beitrag auf Editieren und machst das zuallererst.

2.) Quadrieren ist Power(x, 2), fürs Wurzelziehen ist die Funktion Sqr(Zahl) (sqr für Square Root = Quadratwurzel) zuständig.

3.) Da wir Dein Form nicht sehen kann ich mir unter "wenn ich im edit 1 meine zahlen eingebe, soll das automatisch zu edit 2 wechseln" aboslut GAR nicht vorstellen. Bitte geb uns da etwas mehr infos: WAS soll WANN WIE genau wechseln?

[Lyrice]

wo? oben rechts? editieren? is net da.....
klick hier schon überall rum...

[mkinzler]

Allen Quellcode markieren und auf Button "Delphi-Code" Klicken

[Phoenix]

Edit-Button siehe Anhang.

[Hawkeye219]

Zitat:

Zitat von Phoenix

Quadrieren ist Power(x, 2), fürs Wurzelziehen ist die Funktion Sqr(Zahl) (sqr für Square Root = Quadratwurzel) zuständig.

Knapp daneben! Quadrieren ist Sqr(), die Quadratwurzel wird mit Sqrt() ermittelt.

Gruß Hawkeye

[DP-Maintenance]

Dieses Thema wurde von "SirThornberry" von "Sonstige Fragen zu Delphi" nach "Object-Pascal / Delphi-Language" verschoben.

[SnuffMaster23]

Und Strichpunkte am Zeilenende würden sich glaub ich auch nicht schlecht machen ;)
Sonst kriegst du mysteriöse Fehler am Beginn der nächsten Zeile.

[Lyrice]

ja ja die ; hab ich ja alle gemacht.... schon lange blos hier habs ich net reingesetzt

[Tormentor32]

Ich würde mir von Anfang an angewöhnen (an an an :-D ) meine Controls aussagekräftig zu benennen. Denn mit Button1 und Button2 kann man schließlich nicht so viel anfangen. Bei so einem kleinem Projekt ist das sicherlich kein Problem, aber wenn das Projekt größer ist, dann findest du nichts mehr wieder. Wenn deine Buttons (Achtung, nur ein Beispiel!!!) btnAddieren und btnSubrahieren heißen, dann weißt du auch nach 5 Jahren, wenn du das Projekt durch Zufall nochmal rausholst immer noch, was der Button machen soll.

Hast du die Suchfunktion benutzt, bevor du diesen Thread erstellt hast? Such mal nach Taschenrechner da findest du schon einiges!