regning med variabler

Så vidt jeg ved er der ingen simpel måde, men det er jo oplagt med en case.

Case tegn of  {hvor tegn er en char}
'+': Resultat := var1+var2;
'-': Resultat := var1-var2;
'*': Resultat := var1*var2;
'/': Begin
      if abs(var2) > 1e-10 then
        Resultat := var1-var2
      else
      Begin
        Showmessage('Division med 0');
        Resultat := 0;
      end;
    end;
else
  begin
    showmessage(tegn+' er ikke en gyldig regneart);
    Resultat := 0;
  end;
end;

der findes mange funktioner til at udregne den slags, en textstreng der indehoder f.eks. : "10+5*23" du kan søge på nettet efter dem

gå evt efter en math parser eller lign