Forum: Object-Pascal / Delphi-Language
by Bummi,
22. Nov 2010
das war die Stelle wo ich meinte da kann nichts sinnvolles bei herauskommen, ich denke Du meintest
k := (StrToFloat(memo1.Lines)-(StrToFloat(memo1.Lines)))
Forum: Object-Pascal / Delphi-Language
by Bummi,
21. Nov 2010
der Ansatz wirkt extrem befremdlich, dass dabei nichts sinnvolles rauskommt wenn mehr als 2 Zeilen in Memo1 sind, oder die Zeilen keine gültige Zahl ergeben ist Dir klar.
Dein Problem hier ist das
Memo2.Lines.Insert(i, FloatToStr(k));
Du fügst hier an die Stelle i die nach dem Schleifendurchlauf eigentlich nicht auswertbar ist, bei 2 Zeilen üblicherweise aber 3 enthalten wird einen Text...