如何在 Haskell 中模拟“点击”事件

问题描述

我想在 Haskell 内部点击一个按钮，我正在使用（也许我错了） 函数 dispatchEvent_ https://hackage.haskell.org/package/jsaddle-dom-0.9.4.1/docs/JSDOM-Generated-EventTarget.html。 我的代码如下：

event  <- (toJSVal "click" )
dispatchEvent_ (button_run :: HTMLButtonElement) (MouseEvent event  )

但是我遇到了以下运行时错误：

EventTarget.dispatchEvent 的参数 1（'event'）必须是 Event 的一个实例。

感谢您的帮助。

解决方法

使用 JSDOM.Generated.HTMLElement.click 在您的 HTMLButtonElement 上触发点击事件。