lommeregnerlav string om til int resultat

Der er læssevis af den slags algoritmer på nettet.  Det er normen at man bruger Gentaget (Omvendt) Polsk Notation ((Reverse) Recurrent Polish Notation= RPN) til den slags.  Søg fx. på Google efter "Delphi RPN Source" og se hvad du får.  Fx. er der så vidt jeg lige kan se med et hurtigt kik på sitet http://mathmatrix.narod.ru/Algor.html en udemærkert forklaring samt noget Delphi source til en Calculator unit (den har jeg dog ikke hentet ned).

NIP

Jeg tænkte på om der ikke er nogen der vil give mig et kode eksempel?

Jeg har disse to variabler:

  Streng: string;
  Sum:    integer;

  Streng := '-4+5*(8+2)';
 
Det jeg vil er at finde en metode for at regne denne string om til integer, eller float. I hvert fald et resultat

  Sum := -4+5*(8+2);

Summen er dette vil være 46, men jeg kan ikke finde ud af hvordan jeg overføre værdien fra string til integer. Man kan jo ikke bruge StrToInt() da der er + - * og (). Hvilken funktion skal jeg bruge, eller hvad skal jeg gøre?

PS. Svar skal helst være kodeeksempler.

1)
  Download http://borrisholt.com/eksperten/parser.zip
2)
  prøv der her :

var
  Valid: Boolean;
  e: Extended;
begin
  e := GetExpr('4+3*2', Valid);
  if Valid then
    CalcEdit.Caption := FloatToStr(E);
end;


Jens B

Øhm.. zipfilen parser.zip er tom.. og jeg ved så ikke om det er derfor, men delphi kan ikke kende GetExpr.

http://www.eksperten.dk/spm/571979

Der er det hele.

Og jeg må indrømme at det er svært at bruge søgningen ordentligt.
Prøv at søge på "lommeregner".

Min firewall spiser den .... Skriv til Jens@Borrisholt.com og spørg efter parser.zip så skal du få et færdigt kørende ekspempel. Der kan regne ud hvad 2*3+4 er !!!

Jens B

Tak for svarende..