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!

[Lyrice]

ja dankeschön. werde ich mir für die zukunft merken. blos ich bin noch richtig dolle blond was delphi angeht. wenn ihr mir schreibt wurzel und quadrat sind sqr und sqrt und so... da habe ich trotzdem noch keine ahnung wie ich did schreibe.dachte eigentl. dass ihr mir in dem sinne hilft... von procedure bis end; weil frau halt :) *lol*
so bedanke mich bei euch schonmal im vorraus.
Lucy

[xZise]

Übrigens wäre es auch ein Vorteil einzurücken ;)

PS: Seit wann kann man mit "Sqr" quadrieren?

[Lyrice]

bei mir gehts! sqrt(z1) ist wurzel und sqr(z1) ist quadrieren.

das problem ist jetzt auch dass ich nicht nur die zwei edit felder habe wo ich nur die zahlen eingebe, sondern auch buttons von 0-9 wenn ich draufklicke soll in einem labelfeld das stehen welche taste ich klicke und dann natürlich das ergebnis. wie macxhe ich das nun alles wieder?

[Der_Unwissende]

HI und erstmal (etwas nachträglich) Herzlich Willkommen in der DP :dp:

Zitat:

Zitat von Lyrice

das problem ist jetzt auch dass ich nicht nur die zwei edit felder habe wo ich nur die zahlen eingebe, sondern auch buttons von 0-9 wenn ich draufklicke soll in einem labelfeld das stehen welche taste ich klicke und dann natürlich das ergebnis. wie macxhe ich das nun alles wieder?

Was genau kennst Du denn davon schon? Du machst das ja für die Schule, was hat man Dir denn dort schon gezeigt?
Am einfachsten ist es, wenn Du das was passieren soll erstmal aufschreibst, in ganz normaler Sprache, ganz ohne Delphi. Überleg Dir so einfach mal den Ablauf. Hast Du das fertig (drückt man Taste X passiert ....), dann schaust Du einfach mal, was davon Du schon hinbekommst und/oder wo genau Du dann scheiterst und fragst da nochmal gezielt nach. Das hat dann für Dich den Vorteil, dass Du es einfacher lernst (als wenn jmd. Code vorlegt den Du verstehen musst) und das wiederum hilft Dir spätestens in der nächsten Klausur!

Gruß Der Unwissende

[Lyrice]

hey zwar sehr wenig mit eurer hilfe, aber alleine habe ich dieses programm beendet. danke