Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -module(gui_functions).
- -export([startGUI/0]).
- -include("params.hrl").
- -include_lib("wx/include/wx.hrl").
- startGUI() ->
- Wx = wx:new(),
- Frame = wxFrame:new(Wx, -1, "Cars", [{size, {?Max_x, ?Max_y}}]),
- Panel = wxPanel:new(Frame),
- wxWindow:setBackgroundColour(Panel, {11,11,211}),
- GrassPanel = wxPanel:new(Panel,250,0,700,600),
- GrassPic = wxBitmap:new(wxImage:scale(wxImage:new("gui/grass.jpg"),700,600)),
- Paint = wxPaintDC:new(GrassPanel), % THIS LINE IS PROBLEMATIC, IT TERMINATES THE WX PROCESS
- wxDC:drawBitmap(Paint, GrassPic, {0,0}),
- wxPaintDC:destroy(Paint),
- wxFrame:connect(Frame, command_menu_selected),
- wxFrame:show(Frame).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement