Zitat von
Nicodius:
Text.Lines.strings[i] durchsucht nur die aktuelle Zeile(geht zeilenweise durch)--> das programm soll jetzt das berrechnen(addieren ist das jetzt) Rw: !-34+67-!
Was willst du bei dem Beispiel erreichen?
Eine Berechnung von 3+4+6+7, also jede
Ziffer einzelnd addieren, oder
eine Berechnung von 34+67, also die
Zahlen/Werte addieren?
Grundsätzlich, überlege mal, was du tust (ich beziehe mich auf dein Eingangsposting) - siehe Kommentare im Code:
Code:
//Z1
// Beipiel: Text.Lines.Strings[i] ist "Rw: !-4+9-!"
Str := Pos('!-',Text.Lines.Strings[i])+2; //Str ist 7 (zeigt auf die "4")
for e := 0 to Pos('+', Text.Lines.Strings[i]) do //e --> 0 bis 8
Befehl := Befehl + Text.Lines.Strings[i][Str+e]; //Befehl ist danach Zeichen 7 - 15,
//also "4+9-!"
//Soll das so sein? Glaube ich nicht ...
Z1 := Befehl;
Befehl := '';
Aber geraten und geglaubt wurde hier jetzt schon genug!
Siehe meine Frage oben.
Und lese mal in der Online-Hilfe etwas nach über den Befehl
Copy. Den kannst du wohl gut gebrauchen.