diff options
| author | Dan Gudmundsson <[email protected]> | 2012-12-14 14:45:50 +0100 |
|---|---|---|
| committer | Dan Gudmundsson <[email protected]> | 2013-01-09 11:44:28 +0100 |
| commit | ae412569d12eff642b5eaaf55915ea8cda9dce0b (patch) | |
| tree | 1149a2e00d8ed78910a4582029eb862cd84ab297 /lib/wx/examples/demo/ex_button.erl | |
| parent | a15d14a0c266b9e86c5a2ca39b3c1808a5e1bae0 (diff) | |
| download | otp-ae412569d12eff642b5eaaf55915ea8cda9dce0b.tar.gz otp-ae412569d12eff642b5eaaf55915ea8cda9dce0b.tar.bz2 otp-ae412569d12eff642b5eaaf55915ea8cda9dce0b.zip | |
wx: Fix the demo
Changing demo, didn't close the previous choosen demo, which
looked really bad on Windows.
Diffstat (limited to 'lib/wx/examples/demo/ex_button.erl')
| -rw-r--r-- | lib/wx/examples/demo/ex_button.erl | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/lib/wx/examples/demo/ex_button.erl b/lib/wx/examples/demo/ex_button.erl index 0dd0363933..41bf34e572 100644 --- a/lib/wx/examples/demo/ex_button.erl +++ b/lib/wx/examples/demo/ex_button.erl @@ -25,7 +25,8 @@ -include_lib("wx/include/wx.hrl"). -behaviour(wx_object). --export([start/1, init/1, terminate/2, code_change/3, +-export([start/1, init/1, + terminate/2, code_change/3, handle_info/2, handle_call/3, handle_cast/2, handle_event/2]). -record(state, @@ -120,6 +121,7 @@ do_init(Config) -> wxWindow:connect(Panel, command_button_clicked), wxWindow:setSizer(Panel, Sz), wxSizer:layout(Sz), + wxWindow:refresh(Panel), wxScrolledWindow:setScrollRate(Panel, 5, 5), {Panel, #state{parent=Panel, config=Config}}. @@ -149,6 +151,10 @@ handle_info(Msg, State) -> demo:format(State#state.config, "Got Info ~p~n",[Msg]), {noreply,State}. +handle_call(shutdown, _From, State=#state{parent=Panel}) -> + wxPanel:destroy(Panel), + {stop, normal, ok, State}; + handle_call(Msg, _From, State) -> demo:format(State#state.config,"Got Call ~p~n",[Msg]), {reply,ok,State}. @@ -160,7 +166,7 @@ handle_cast(Msg, State) -> code_change(_, _, State) -> {stop, ignore, State}. -terminate(_Reason, _State) -> +terminate(_Reason, _) -> ok. %%%%% a copy from wxwidgets samples. |