Como criar formula no Delphi sem precisar compilar

import java.io.*;
import java.util.*;

abstract public class Exp
{

    protected Exp()
    {
    }

    abstract public int Avaliar();

    static private Exp Fator(StringTokenizer t)
    {
        if (!t.hasMoreTokens())
            return null;
        String sym = t.nextToken();
        try
        {
            return new Numero(Integer.parseInt(sym));
        }
        catch (Exception e)
        {
            return new Identificador(sym);
        }
    }

    static private Exp Termo(StringTokenizer t)
    {
        Exp esq = Fator(t);
        while (t.hasMoreTokens())
        {
            String op = t.nextToken();
            Exp dir = Fator(t);
            
            esq = new OperadorBinario(esq, dir, op);
        }
        return esq;
    }

    static public Exp Compilar(String s)
    {
        StringTokenizer t = new StringTokenizer(s, " ");
        return Termo(t);
    }

    static public void main(String args[]) throws Exception
    {
        System.out.print(Exp.Compilar((new BufferedReader(new InputStreamReader(System.in))).readLine()).Avaliar());
    }

}

class Numero
    extends Exp
{

    private int valor;

    protected Numero(int avalor)
    {
        super();
        this.valor = avalor;
    }

    public int Avaliar()
    {
        return valor;
    }

}

class Identificador
    extends Exp
{

    private String nome;

    protected Identificador(String anome)
    {
        super();
        this.nome = anome.intern();
    }

    public int Avaliar()
    {
        if (nome == "A")
            return 1;
        if (nome == "B")
            return 2;
        if (nome == "C")
            return 3;
        if (nome == "D")
            return 4;
        return 0;
    }

}

class OperadorBinario
    extends Exp
{

    private String op;
    private Exp esquerda, direita;

    protected OperadorBinario(Exp aesquerda, Exp adireita, String aop)
    {
        super();
        this.op = aop;
        this.direita = adireita;
        this.esquerda = aesquerda;
    }

    public int Avaliar()
    {
        switch (op.charAt(0))
        {
            case ´+´: return esquerda.Avaliar() + direita.Avaliar();
            case ´-´: return esquerda.Avaliar() - direita.Avaliar();
            case ´*´: return esquerda.Avaliar() * direita.Avaliar();
            case ´/´: return esquerda.Avaliar() / direita.Avaliar();
            default: return -1;
        }
    }

}