Autor Beitrag
lbstylez
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Mo 03.03.08 17:19 
hey Leute,
Ich schreibe gerade eine taschenrechner mit den grundrechenarten.
Aufjedenfall kreig ich Plus,minus und Multiplizieren super hin nur dividieren nicht.
Bitte um hilfe:

PS: Ich weiss das ich mit float arbeiten muss hab aber kein Plan wie^^.

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
procedure TForm1.Button4Click(Sender: TObject);
begin
Zahl1 := strtoint (edit1.text);
Zahl2 := strtoint (edit2.text);
Ergebnis :=strtoint (Zahl1/Zahl2);     <---------------


Moderiert von user profile iconTino: Großbuchstaben im Titel entfernt.
Moderiert von user profile iconTino: Delphi-Tags hinzugefügt.
jakobwenzel
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1889
Erhaltene Danke: 1

XP home, ubuntu
BDS 2006 Prof
BeitragVerfasst: Mo 03.03.08 17:23 
Es gibt hier eine Suche, solche Themen wurden hier schon oft behandelt.

_________________
I thought what I'd do was, I'd pretend I was one of those deaf-mutes.
Yogu
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2598
Erhaltene Danke: 156

Ubuntu 13.04, Win 7
C# (VS 2013)
BeitragVerfasst: Mo 03.03.08 17:26 
Hallo user profile iconlbstylez,

du brauchst nicht unbedingt eine Fließkommazahl zu verwenden. Mit div bekommst du das Dividieren auch mit Ganzzahlen hin:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
procedure TForm1.Button4Click(Sender: TObject);
var Zahl1, Zahl2: Integer;
begin
  Zahl1 := StrToInt(Edit1.Text);
  Zahl2 := StrToInt(Edit2.Text);
  Ergebnis := IntToStr(Zahl1 div Zahl2);
end;

Oder du verwendest tatsächlich Floats:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
procedure TForm1.Button4Click(Sender: TObject);
var Zahl1, Zahl2: Double;
begin
  Zahl1 := StrToFloat(Edit1.Text);
  Zahl2 := StrToFloat(Edit2.Text);
  Ergebnis := FloatToStr(Zahl1 / Zahl2);
end;

:arrow: Ich empfehle dir einen Crashkurs von user profile iconChristian S..
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19346
Erhaltene Danke: 1754

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Mo 03.03.08 17:29 
Du solltest dir vielleicht zunächst einmal klar machen, was der Befehl StrToInt überhaupt macht...
Dafür gibt es die Hilfe, drück einfach F1 wenn du den Textcursor auf den Befehl gesetzt hast.
An dieser Stelle weise ich auch einmal auf den Crashkurs von Christian hin:
crashkurs.christian-stelzmann.de

// EDIT: Und wie es richtig aussieht siehst du ja bei user profile iconYogu.
joker0000
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 70

Win XP
Delphi 2006
BeitragVerfasst: Mo 03.03.08 17:35 
haben auch mal als einsteigerprojekt n taschenrechner gemacht. vielleicht hilft dir das ja...
Einloggen, um Attachments anzusehen!
Timosch
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
Beiträge: 1314

Debian Squeeze, Win 7 Prof.
D7 Pers
BeitragVerfasst: Mo 03.03.08 18:07 
user profile iconYogu hat folgendes geschrieben:

du brauchst nicht unbedingt eine Fließkommazahl zu verwenden. Mit div bekommst du das Dividieren auch mit Ganzzahlen hin:

Vorsicht, das hat bei einem anderen Thread vor kurzem den Fragesteller total durcheinandergebracht.
Also, für den Threadstarter:
div ist eine Ganzzahlendivision, der Rest wird ignoriert. 4 div 3 = 1. Wenn du das suchst, dann gut, aber ich bezweifle es. Wie die Lösung, die du wahrscheinlich willst (also eine ganz normale Division), aussieht, siehst du beim zweiten Quelltext von Yugo.

_________________
If liberty means anything at all, it means the right to tell people what they do not want to hear. - George Orwell