anchor.diff:      MFrame = wx:batch(fun() ->
   			      MFrame = wxFrame:new(Wx, ?wxID_ANY, "Main Frame"),
   			      wxPanel:new(MFrame, [{size, {600,400}}]),
  +			      wxFrame:connect(MFrame, show),
   			      wxWindow:show(MFrame),
   			      MFrame
   		      end),
  -    timer:sleep(9),
  +    receive #wx{event=#wxShow{}} -> ok
  +    after 1000 -> exit(show_timeout)
  +    end,
   
       {X0, Y0} = wxWindow:getScreenPosition(MFrame),
       {X, Y, W,H} = wxWindow:getScreenRect(MFrame),
  
positive.code:     Panel = wxPanel:new(Frame),
      Sz = wxBoxSizer:new(?wxVERTICAL),
  
      {YMD={_,_,Day},_} = DateTime = calendar:now_to_datetime(erlang:now()),
      Cal = ?mt(wxCalendarCtrl, wxCalendarCtrl:new(Panel, ?wxID_ANY,
  						 [{date,DateTime}
  						 ])),
  
negative.code:     Frame = wxFrame:new(Wx, ?wxID_ANY, "Frame"),
  
      TrSortRadioBox = wxRadioBox:new(Frame, ?wxID_ANY, "Sort by:",
  				    {100, 100},{100, 100},
  				    ["Timestamp", "Session", "FooBar"]),
  
      io:format("TrSortRadioBox ~p ~n", [TrSortRadioBox]),
      wxRadioBox:setSelection(TrSortRadioBox, 2),
      wxRadioBox:setItemToolTip(TrSortRadioBox, 2, "Test"),
      TT0 = ?mt(wxToolTip,wxRadioBox:getItemToolTip(TrSortRadioBox, 0)),
      TT1 = ?mt(wxToolTip,wxRadioBox:getItemToolTip(TrSortRadioBox, 2)),
      ?m(true, wx:is_null(TT0)),
      ?m("Test", wxToolTip:getTip(TT1)),
      wxWindow:show(Frame),
      wx_test_lib:wx_destroy(Frame,Config).
  
  