Den String '+' als Operator verwenden?

[DiscMix]

Hallo,

ich hoffe hier bin ich richtig ;)

Ich habe zwei Editfelder, Ein Dropdownfeld mit den Strings +,-,*,/ und ein OK-Button.
Nun werden die beiden Editfelder mit Werten gefüllt, und der Operator ausgewählt.
Bei drücken auf den OK-Button soll das Ergebnis berechnet werden.

Wie kann ich den Operator als String "umwandeln", damit die Rechnung auch hinhaut ???

Danke
Marco

[ibp]

frag doch ab welcher operator aus der drop down liste gewählt wurde und dann berechne dementsprechend das ergebnis. du brauchst die operatoren nicht umzuwandeln!

[fkerber]

HI!

Ich würde es so machen:

Delphi-Quellcode:

//Reihenfolge in der Combobox: +,-,*,/

case Combobox1.Itemindex of
 0: edit3.text:=inttostr(strtoint(edit1.text) + strtoint(edit2.text));
 1: edit3.text:=inttostr(strtoint(edit1.text) - strtoint(edit2.text)); 
 2: edit3.text:=inttostr(strtoint(edit1.text) * strtoint(edit2.text));
 3: edit3.text:=inttostr(strtoint(edit1.text) div strtoint(edit2.text));
end;

Ciao fkerber

[Matze]

Anstatt div würde ich / nehmen und den Typ Real. ;)

[fkerber]

Hi!

@Matze:
Das wäre wohl sinnvoller, da gebe ich dir recht, aber dann wär das mit Copy und Paste nicht so schön gegangen :mrgreen:

Ciao Frederic

[DiscMix]

Danke, Danke für das schnelle Feedback...

Eigentlich wollte ich die Case-Möglichkeit vermeiden, da später weitere Optionen im DropdownFeld stehen werden...
Gibt es noch eine andere Möglichkeit?

Gruss
Marco

[ibp]

... und wo ist dann das problem die weiteren optionen mit case abzufragen?

[xineohp]

es ist mühsam ... schätz ich mal :stupid:

[Die Muhkuh]

Du könntest es mit If-Abfragen machen:

Delphi-Quellcode:

if Combobox1.ItemIndex = 0 then
  //machwas
else
if Combobox1.ItemIndex = 1 then
// machwas
...

Aber mit Case gehts am besten^^.

[DiscMix]

ich sach mal so: Jetzt gibt es 80 Editfelder und 40 Dropdownfelder und eigentlich wolte ich die Werte und den Operator an eine Funktion übergeben, weil noch ein paar weitere Bedingungen vor der und nach der Berechnung abgeprüft werden.

Jetzt wirds langsam lustig ;)