なかなか分かってきた。wxErlangが。
wxDialogだけ表示させるソースを載っける。
ソース:
-module(onlydialog).
-export([start/0]).
-include_lib("wx.hrl").
start() ->
Wx = wx:new(),
Dialog = wx:batch(fun() -> create_window(Wx) end),
wxWindow:show(Dialog),
loop(Dialog),
wx:destroy(),
ok.
create_window(Wx)->
Dialog = wxDialog:new(Wx,
-1,
"Dialog Example",
[{size,{300,200}}]),
% connect
wxDialog:connect(Dialog, close_window),
Dialog.
loop(Dialog) ->
receive
% Window Close Event
#wx{event=#wxClose{}} ->
io:format("~p Closing window ~n",[self()]),
wxWindow:destroy(Dialog),
ok
end.
wx:new()はたぶん必要。
すべてのwxクラス(wxDialogとか)のベースになっているようで。
それにしても、wxErlangのサンプルは大きすぎてわからん。
0 件のコメント:
コメントを投稿