ClojureScript 在视频上使用 .requestFullscreen答案

【问题标题】：ClojureScript use .requestFullscreen on a videoClojureScript 在视频上使用 .requestFullscreen
【发布时间】：2016-09-23 00:54:59
【问题描述】：

我如何在来自另一个元素的视频上.requestFullscreen（或.-volume）？

我尝试过使用this-as 宏和getElementByID，但是当我尝试调用这个函数时，我的编辑器和 Figwheel 很不高兴。

【问题讨论】：

对不起，但“不开心”是一个相当模糊的陈述。尝试发布无花果显示的异常。我建议使用 Lighttable 作为编辑器和 figwheel 进行实时编辑，一些信息：stackoverflow.com/questions/37104853/…。另请查看How to Ask，了解有关如何提出好问题的一些指南。

标签： html5-video clojurescript reagent

【解决方案1】：

这是一种方法：

(defn foo []
  (let [v (atom nil)]
    [:div
     [:button
      {:on-click
       (fn [e]
         (when @v
           (cond
             (.-requestFullscreen @v) (.requestFullscreen @v)
             (.-mozRequestFullScreen @v) (.mozRequestFullScreen @v)
             (.-webkitRequestFullScreen @v) (.webkitRequestFullscreen @v)
             :else nil)))}
      "Fullscreen"]
     [:video
      {:ref
       (fn [elem]
         (when elem
           (reset! v elem)))
       :src "https://archive.org/download/WebmVp8Vorbis/webmvp8.webm"}
      "Sorry, your browser doesn't support embedded videos."]]))

【讨论】：