如何在没有控制台的情况下在Windows下创build或编译GUI应用程序? 我已经search了互联网,但是我没有find有用的东西。 我希望你能提供任何指导。
(* ocamlc -I +labltk labltk.cma gui.ml -o gui.exe *) open Tk ;; let top = openTk () ;; Wm.title_set top "Application 1" ;; Wm.geometry_set top "200x500";; let blue = Button.create ~text:"Blue" top ;; let red = Button.create ~text:"Red" top ;; pack [blue ; red];; let mylist = Listbox.create ~selectmode:`Multiple top let _ = Listbox.insert ~index:`End ~texts:["Mozart";"Chopin";"Beethoven";"Verdi";"Bizet"] mylist ;; pack [mylist];; let _ = Printexc.print mainLoop ();;
你需要将“子系统窗口”传递给链接器; 并可能“自定义”,因为ocamlrun.exe是一个控制台应用程序:
ocamlc -I +labltk labltk.cma gui.ml -custom -cclib -subsystem -cclib windows -o gui.exe
我主要是一个OS X / Unix / Linux程序员,但你可以试试这个其他SO页面:
隐藏Windows应用程序的控制台
关键因素似乎是链接器选项和入口点名称。