1
2
3
4
5
6
7
8
9
10
11
12
13
14

module QtHelloWorld

open com.trolltech.qt.gui

let main() =
  QApplication.initialize [||]
  let btn = QPushButton "Hello World!"
  btn.setWindowTitle "Hello World Title"
  btn.resize(320,240)
  btn.show()
  QApplication.exec() |> ignore
  ()

main()