Memoeintrag hinzufügen (erweitert)

[Bummi]

Zitat:

k := k + (StrToFloat(memo1.Lines[i+1])-(StrToFloat(memo1.Lines[i])));

das war die Stelle wo ich meinte da kann nichts sinnvolles bei herauskommen, ich denke Du meintest

Delphi-Quellcode:

 k :=  (StrToFloat(memo1.Lines[i+1])-(StrToFloat(memo1.Lines[i])))

[Portfreak]

xD ist mir garnicht aufgefallen xDDD.
Danke!! Ihr seid cool ^^.

[Sir Rufo]

Zitat:

Zitat von Portfreak (Beitrag 1063185)

Danke! Ihr seid die besten!

Allerdings gibt es Rechenfehler :(

Bei -> Folgt
1 -> nichts (ist ja richtig)
9 -> 8 (auch richtig)
18 -> 17 (falsch)
60 -> 59 (falsch)

??? :?:
^^"

Edit: Echt tolle erklärung hier! Das muss ich mal besonders loben :)

Das mit dem Rechenfehler hat sich ja nun aufgeklärt, aber an deiner Fehlerbeschreibung musst du dringend arbeiten, denn wenn ich den Code ausführe, dann sieht meine Ausgabe so aus wie im Anhang zu sehen.
Wie kommt man bei so einer Ausgabe darauf zu sagen

Zitat:

Bei -> Folgt
1 -> nichts (ist ja richtig)

Kleiner Hinweis:
Bei der Programmierung geht es niemals um ungefähr oder irgendwie so, sondern immer um genau so.
Weiterhin macht ein Programm immer das, was man ihm sagt ... das kann von dem was man möchte erheblich abweichen ;)