Parser - einfache Mathematische Formel

[noisy_master]

Moin,

wenn du Werte von Parametern verändern möchtest müssen diese schon als var deklariert werden...

Dann kplappts auch mit dem i und dem zwErgebnis...

[Jens01]

einen einfachen Math-Parser gibt es nicht. Entweder ganz oder gar nicht.
siehe RPN

[Dejan Vu]

Zitat von Jens01:

einen einfachen Math-Parser gibt es nicht. Entweder ganz oder gar nicht.

Doch. Hier.

[Rollo62]

Das hier meinte ich.

Alles schon im Paket enthalten

Rollo

[Stevie]

Geht mit DelphiWebScript kinderleicht:

Delphi-Quellcode:

program MathExample;

{$APPTYPE CONSOLE}

uses
  dwsComp,
  dwsExprs;

var
  s: string;
  compiler: TDelphiWebScript;
  prog: IdwsProgram;
  exec: IdwsProgramExecution;
begin
  compiler := TDelphiWebScript.Create(nil);
  try
    repeat
      Readln(s);
      if s = '' then Exit;
      prog := compiler.Compile('Print(' + s + ')');
      if prog.Msgs.HasErrors then
        Writeln(prog.Msgs.AsInfo)
      else
      begin
        exec := prog.Execute;
        Writeln(exec.Result.ToString);
      end;
    until False;
  finally
    compiler.Free;
  end;
end.

LOL @LiveBindings Lösung...

[Dejan Vu]

Boah. Da fällt mir ein: "Wenn man die Lösung hat, hat man das Problem fast gelöst".

[Rollo62]

Zitat:

LOL @LiveBindings Lösung...

1. DWS ist mit Kanonen auf Spatzen für + - * /
2. Ist DWS MultiPlatform kompatibel ?
3. Warum nicht mal erst schauen was im Framework drin ist ?

Wenn der Tag kommt wo du dein Projekt auf FMX ziehen musst dann LOL ich

Rollo