"invalid floating point operation" finde den Fehler nicht

[himitsu]

Zitat von St0rmhunter:

Wie ich les hinterm Stringende weiter??

Zitat von St0rmhunter:

Delphi-Quellcode:

to length(memo1.text) do
  begin
    Bst:=strtofloat(memo1.text[i]+memo1.text[i+1]+memo1.text[i+2]);

(Length+2 > index des letzten Zeichens) = hinter dem Stringende lesen
Geh mal in deine Projektotionen und schalte die Indexprüfung an.

Und .Text holt jedesmal, bei jedem Aufruf den Text neu aus dem Memo ... das vorher in eine Variable erspart Vieles.

Zitat:

memo1.text[i]+memo1.text[i+1]+memo1.text[i+2]

PS: Kennst du schon Copy?

[St0rmhunter]

Upps da hab ich wohl die -2 vergessen for i:=1 to length(memo1.text)-2 do .

Nee kenne copy nicht.

So habe die -2 ergänzt und trotzdem kommt noch die Fehlermeldung "Invalid floating point operation"