Also alles was im Edit steht ist text:
Bsp: 234+586
jetzt kannst du nach einem bestimmten zeichen in einer Zeichenkette(string) mit folgender Funktion suchen
Delphi-Quellcode:
var Aufgabe : string;
Zahl1, Zahl2, Ergebnis : extended;
OperantenPosition : integer;
...
Aufgabe := edit1.text;
OperantenPosition := Pos('+',Aufgabe);
// wenn es das Zeichen nicht gibt, wird 0 zurückgegeben
jetzt musst du den string(Aufgabe) nur noch Auspalten, in das was vor dem zeichen steht und das was dahinter steht
Delphi-Quellcode:
Zahl1 := StrToInt(copy(Aufgabe,1,OperantenPosition - 1));
Zahl2 := StrToInt(copy(Aufgabe,OperantenPosition + 1,length(Aufgabe)));
Ergebnis := Zahl1 + Zahl2;
im Prinzip ganz einfach.
Zur Funktion
copy(String,Start,Ende)
Diese Funktion kopiert dir einen string von a nach b, also gibt man dort als ersten Parameter den zu kopierenden String, als zweiten Parameter die Startposition, und als letzten Parameter die Endposition an.
Probier einfach mal weiter.
falls du zu zweitens fragen hast immer zu!
Wenn du möchtest kann ich dir auch meine
DLL zur Verfügung stellen, mit der du alles machen kannst, z.B. diese Aufgabe Lösen: sin(x²) * e^(x-1) + 3x -4 und dann einen Funktionswert für x ausrechnen.
Aber mit viel Übung kannste deinen taschenrechner im Prinzip auch irgendwann so programmieren