TMtxExpression.ExprCount Property

Returns: Int32

Copyuses MtxParseExpr, MtxParseClass;

procedure Example;
var myParser: TMtxExpression;
begin
    myParser := TMtxExpression.Create;
    try
        myParser.Expressions := 'x+y;sqrt(x);x/y';
        ShowMessage(IntToStr(myParsers.ExprCount)); // 3
    finally
        myParser.Free;
    end;
end;