Einzelnen Beitrag anzeigen

Benutzerbild von fkerber
fkerber
(CodeLib-Manager)

Registriert seit: 9. Jul 2003
Ort: Ensdorf
6.723 Beiträge
 
Delphi XE Professional
 
#3

Re: Den String '+' als Operator verwenden?

  Alt 9. Aug 2004, 09:49
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
Frederic Kerber
  Mit Zitat antworten Zitat