Entwickler-Ecke
Sonstiges (Delphi) - DRINGEND!!! Befehl für die Divison
quantum - So 23.11.03 16:27
Titel: DRINGEND!!! Befehl für die Divison
Ich habe versucht einen Taschenrechner zu programmieren. Addieren, Subtrahieren, Multiplizieren funktioniert alles, aber bloß nicht die Division. Hier ist ein Ausschnitt des Quelltextes für die Addition:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| var
Zahl1, Zahl2, ergebnis: integer;
begin
Zahl1:=StrToInt(Edit1.Text);
Zahl2:=StrToInt(Edit2.Text);
ergebnis:=Zahl1+Zahl2;
Label5.Caption:=IntToStr(ergebnis);
end; |
Einfach das Pluszeichen durch das"/" ändern geht nicht, das kommt folgende Fehlermeldung:
| Zitat: |
| [Fehler] rechner.pas(39): Inkompatible Typen: 'Integer' und 'Extended' |
für diese Zeile
Delphi-Quelltext
1:
| ergebnis:=Zahl1/Zahl2; |
Kann mir BITTE Einer den Befehl für Division geben?
Moderiert von 
tommie-lie: Delphi- und Quote-Tags hinzugefügt
MSCH - So 23.11.03 16:34
tja die Division liefert keine ganzen Zahlen. Also musst du den Typ des Ergebnisses ändern.
Delphi-Quelltext
1:
2:
3:
4:
| var Ergebnis: Double;
begin
Ergebnis := 1234 / 43212;
end; |
grez
msch
Christian S. - So 23.11.03 16:57
Und anschließend musst Du "IntToStr " durch "FloatToStr" ersetzen. Wenn Du eine ganzzahlige Division haben willst, dann nimm "div". Dann bekommst aber natürlich nur den ganzzahligen Anteil. 3 div 2 ist also 1.
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!