Problem mit Mathe-Parser

[athomas]

also ich hab das mit den vorzeichen noch ergänzt, es will aber immernochnicht klappen:

Delphi-Quellcode:

//Vorzeichen
  ende:=false;
  i:=0;
  if arr.count>1 then
    begin
      while not(ende) do
        begin
          if ( (i = 0)or(not(isReal(arr[i-1]))) )and(arr[i]='-')and(isReal(arr[i+1])) then
            begin
              arr[i]:=floattostr(-strtofloat(arr[i+1]));
              arr.delete(i+1);
              i:=i-1;
            end;
          i:=i+1;
          if i>=arr.count-1 then
            ende:=true;
        end;
    end;