Ocaml 按钮并排使用标签TK

我正在Ocaml中使用

labletk

。我想创建三个按钮并排

假设以下代码：

#load "labltk.cma";;
let top = openTk() in

...

let button1 = Button.create
      ~text:"Button 1"
      ~command:(fun () -> Tk.closeTk (); exit 0)
      top in

let button2 = Button.create
      ~text:"Button 2"
      ~command:(fun () -> Tk.closeTk (); exit 0)
      top in

let button3 = Button.create
      ~text:"Button 3"
      ~command:(fun () -> Tk.closeTk (); exit 0)
      top in
...

---

现在，按钮一个接一个。对于简单的布局，是否有解决办法使按钮并排

，您可以将其打包：

pack ~side:`Left [button1;button2;button3] ;;