Einzelnen Beitrag anzeigen

Benutzerbild von dizzy
dizzy

Registriert seit: 26. Nov 2003
Ort: Lünen
1.932 Beiträge
 
Delphi 7 Enterprise
 
#3

Re: Mathematischer Parser für komplexe Zahlen + Quaternionen

  Alt 5. Mai 2004, 12:06
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
  Mit Zitat antworten Zitat