Einzelnen Beitrag anzeigen

Der schöne Günther

Registriert seit: 6. Mär 2013
6.155 Beiträge
 
Delphi 10 Seattle Enterprise
 
#6

AW: Taschenrechner mit ListBox!

  Alt 16. Apr 2013, 10:31
1) Warum merkst du dir erst in a und b als Fließkommazahl, was in den Edit-Feldern steht und benutzt es dann nicht?

if ListBox.selected[0] then ergebnis.Caption:= FloattoStr(a + b); liest und schreibt sich doch wohl besser als
if ListBox.selected[0] then ergebnis.Caption:= FloattoStr(StrtoFloat(zaehler.text) + StrtoFloat(zaehler2.text)); Oder?




2) Eine noch einfachere Methode wäre doch einfach zu sagen "Wenn das dritte Item in der Listbox ausgewählt ist (Division) und b=0 ist, dann
Delphi-Quellcode:
begin
   ShowMessage('Teilen durch 0 nicht erlaubt');
   Exit;
end;
  Mit Zitat antworten Zitat