Jau! Das ist gut zu wissen. Dann kann ich das ja als getestet mit aufnehmen. Danke dir!
Allerding - wenn du nur eine Variable parst, dann wird QMath(2) garnicht angesprochen, da es ja eigentlich nix zu berechnen gibt... Aber schonmal gut, dass es der Parser an sich tut
Delphi 8 würde mich noch brennend interessieren!
Testet am besten in etwa so:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
Parser: TCQParser;
Foobar: TComplex;
begin
Parser := TCQParser.Create();
with Parser do
try
Foobar.x := 4;
Foobar.y := 2;
Parser.Ac := Foobar;
Foobar.x := 6;
Foobar.y := 8;
Parser.Bc := Foobar;
ParseC('A+sin(B)-2');
Foobar := Parser.SolveC();
ShowMessage(IntToStr(Trunc(Foobar.x)) + IntToStr(Trunc(Foobar.y)));
finally
Free();
end;
end;
So kommen eigentlich alle Finessen zum Einsatz.
Danke nochmals!
Fabian K.
INSERT INTO HandVonFreundin SELECT * FROM Himmel