erlang新手入门之创建GUI窗口

一些可以了解的前情提要

关于wxWidget erlangwx
改编于 知乎:Erlang GUI编程 - wxWidgets教程

代码示例

-module(wx_example).
-export([win/0]).

win() ->
  %%新建窗口
  Wx=wx:new(),
  %%设置窗口名
  F=wxFrame:new(Wx, -1, "Hello, World!"),
  %%设置状态栏
  wxFrame:createStatusBar(F),
  SB = wxFrame:getStatusBar(F),
  %%推状态栏文字
  wxStatusBar:pushStatusText(SB, "A LITTLE LOUDER NOW."),
  %%弹出状态栏文字:wxStatusBar:popStatusText(SB).
  %%创建空菜单栏(不显示)
  MenuBar = wxMenuBar:new(),
  wxFrame:setMenuBar (F, MenuBar),
  wxFrame:getMenuBar (F),
  %%生成菜单
  FileMn = wxMenu:new(),
  wxMenuBar:append (MenuBar, FileMn, "&File"),
  %%添加菜单项
  Quit = wxMenuItem:new ([{
    
    id,400},{
    
    text, "&Quit"}]),
  wxMenu:append (FileMn, Quit),
  %%显示窗口
  wxFrame:show(F).

结果如图

在这里插入图片描述

猜你喜欢

转载自blog.csdn.net/alicelise/article/details/115072389