Der HAM-Parser

[dizzy]

Zitat von bg 11:

Wofür steht A,pi2 ??

Die 4 Zeilen sind ohne Zusammenhang evtl. etwas verwirrend

Schritt für Schritt:

Delphi-Quellcode:

procedure Foo;
var
  p: TCQParser;
  v: Double;
  e: Double;
begin
  v := 10;
  p := TCQParser.Create; // klar, Parser erstmal instantiieren
  p.NumberFormat := nfReal; // Dem Parser mitteilen, dass er bitte mit normalen Zahlen rechnen soll ;)
  p.RegisterVariable('x', v); // Dem Parser eine Variable 'x' bekannt machen, die den Wert von v enthalten wird.
  // p.SetVariable(...); Ist wie RegisterVariable, aber für bereits damit erzeugte Variablen.
  p.Parse('(20-x)^2'); // Parsed die Formel. D.h. bereitet sie intern aufs's Ausrechnen vor.
  p.Solve(e); // Rechnet die Formel aus, und schreibt das Ergebnis in e. (e=100 hier)
end;

Parse und Solve sind voneinander getrennt, damit es möglich ist die Werte von Variablen nach dem Parsen zu ändern. Das spart bei jeder Änderung eine Menge Rechenzeit, da das Parsen and sich recht viel CPU-Arbeit (Zeit) kostet, die man so nur einmal machen muss.
Der Parser ist somit dafür gerüstet, ein und die selbe Formel in der sich nur Werte ändern, immer und immer wieder zu lösen ohne zu viel Zeit zu verbraten.


Schönen Gruss,
dizzy