少しだけ機能の追加
http://do.sakura.ne.jp/~junkroom/cgi-bin/megabbs/readres.cgi?bo=lounge&vi=1001489683&res=19&fi=no

>>350　ラベル対応しました
　メソッドの例
function TForm1.IntLabels(Sender:TObject;const lab:string;var res:Int64):boolean;
begin
result:=false;
　if lab='π' then begin res:=31415;result:=true;end;
end;
　これを渡せば動きます

>>407
>>構文解析と四則演算は全然意味が違うと思うんだけど....
　四則演算は構文解析機構のお手本のようなものです。
　スマートな汎用パーサがありえるなら　四則演算もスマートに表現出来なければいけないでしょ？

　しかし四則演算を見れば判る通り、再帰を使った複雑な定義になっています。
　そう簡単じゃないよ＋これに慣れれば他のパーサも簡単だよ・・・てな感じです