TkValidation::ValidateCmd ^(Class)

# File tk/lib/tk/validation.rb, line 64
    def initialize(cmd = Proc.new, *args)
      if args.compact.size > 0
        args = args.join(' ')
        keys = ValidateArgs._get_subst_key(args)
        if cmd.kind_of?(String)
          id = cmd
        elsif cmd.kind_of?(TkCallbackEntry)
          @id = install_cmd(cmd)
        else
          @id = install_cmd(proc{|*arg|
             (cmd.call(*ValidateArgs.scan_args(keys, arg)))? '1':'0'
          }) + ' ' + args
        end
      else
        keys, args = ValidateArgs._get_all_subst_keys
        if cmd.kind_of?(String)
          id = cmd
        elsif cmd.kind_of?(TkCallbackEntry)
          @id = install_cmd(cmd)
        else
          @id = install_cmd(proc{|*arg|
             (cmd.call(
                ValidateArgs.new(*ValidateArgs.scan_args(keys,arg)))
             )? '1': '0'
          }) + ' ' + args
        end
      end
    end

# File tk/lib/tk/validation.rb, line 93
    def to_eval
      @id
    end