Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
 
Share Thread:
Reddit Facebook Twitter
Erlang Run Time Errors
03-04-2017, 04:10 AM (This post was last modified: 03-04-2017 04:12 AM by oort.)
Post: #7
RE: Erlang Run Time Errors
Micheus,
Thanks for the additional information. That helps...

Unfortunately finding the right code to fix the problem with "toplevel" isn't as easy as I thought it would be. I have tried several things but can't get it right.

The code which includes "toplevel" is listed below. No hurry in you looking at this, since I probably won't be able to get back to it till next week... Sad

Thanks,
oort

Quote:%% wings.erl missing stuff added start 2-28-17
new_viewer(St) ->
{Pos,{W,H}} = wings_wm:win_rect(desktop),
Size = {W div 2-40,H div 2-40},
N = free_viewer_num(2),
Active = wings_wm:this(),
Props = wings_wm:get_props(Active),
ToolbarHidden = wings_wm:is_hidden({toolbar,Active}),
Name = {geom,N},
new_viewer(Name, Pos, Size, Props, ToolbarHidden, St).

new_viewer(Name, {X,Y}, Size, Props, ToolbarHidden, St) ->
%% Op = wings:main_loop_noredraw(St),
Title = geom_title(Name),
wings_wm:toplevel(Name, Title, {X,Y,highest}, Size,
[resizable,closable,{anchor,nw},
{toolbar,fun(A, B, C) ->
wings_toolbar:create(A, B, C)
end},
menubar,
%% {properties,Props}],
{properties,Props}]
),
%% Op),

wings_wm:menubar(Name, get(wings_menu_template)),
wings_wm:send({menubar,Name}, {current_state,St}),
wings_wm:send({toolbar,Name}, {current_state,St}),
wings:set_drag_filter(Name),
if
ToolbarHidden -> wings_wm:hide({toolbar,Name});
true -> ok
end,
Name.
%% wings.erl missing stuff added end 2-28-17
Reply


Messages In This Thread
Erlang Run Time Errors - oort - 03-02-2017, 09:06 PM
RE: Erlang Run Time Errors - micheus - 03-02-2017, 10:55 PM
RE: Erlang Run Time Errors - oort - 03-03-2017, 12:23 AM
RE: Erlang Run Time Errors - micheus - 03-03-2017, 07:16 AM
RE: Erlang Run Time Errors - oort - 03-03-2017, 05:08 PM
RE: Erlang Run Time Errors - micheus - 03-03-2017, 07:53 PM
RE: Erlang Run Time Errors - oort - 03-04-2017 04:10 AM
RE: Erlang Run Time Errors - oort - 03-11-2017, 01:42 AM
RE: Erlang Run Time Errors - micheus - 03-11-2017, 01:45 AM
RE: Erlang Run Time Errors - oort - 03-11-2017, 01:48 AM

Forum Jump:


User(s) browsing this thread: 1 Guest(s)