OpenEuphoria

Re: wxEuphoria -- splash screen?

• Posted by Matt Lewis <matthewwalkerlewis at gmail.com> Nov 07, 2005
• 605 views

Jerry Story wrote:
> 
> Matt Lewis wrote:
> > 
> > Jerry Story wrote:
> > > 
> > > I'm having a hard time getting the splash screen demo to work for Linux.
> > > 
> > 
> > Oops, sorry 'bout that, I managed to screw up the wrapper.  I named the 
> > function incorrectly, and didn't register it with create_func().  Here's 
> > how it should look (actually tested it on Linux this time...):
> 
> [...]
> 
> That's an improvement. Now it makes a window; previously it didn't.  But no
> picture and these error messages:
> 
> [quote]
> Gdk-CRITICAL **: file gdkgc.c: line 689 (gdk_gc_set_clip_rectangle): assertion
> 'gc != NULL' failed.
> 
> Gdk-CRITICAL **: file gdkdraw.c: line 90 (gdk_draw_rectangle): assertion 'gc
> != NULL' failed.
> 
> Gdk-CRITICAL **: file gdkgc.c: line 689 (gdk_gc_set_clip_rectangle): assertion
> 'gc != NULL' failed.
> [/quote]
> 
> It is possible and perhaps probable that I didn't install wxSplashScreen.e
> correctly
> from the message, because I find that a bit confusing.
> 

Here is the full Linux version of the file:

--/////////////////////////////////////////////////////////////////////////////
--// Name:        wxSplashScreen.e
--// Purpose:     Class include for wxEuphoria
--// Author:      Matt Lewis
--// Modified by:
--// Created:     2005-11-03
--// Copyright:   (c) Matt Lewis
--// Licence:     wxWindows license
--/////////////////////////////////////////////////////////////////////////////

include dll.e
include cplusplus.e as cpp
include wxEuphoria.e as wxeu

-- begin autogenerated
------------------------------
include wxClassInfo.e as CI

-- begin class wxSplashScreen (17 members)
------------------------------

global constant 

-- wxSplashScreen::GetClassInfo() const
wxSplashScreen_GetClassInfo = define_c_var( wxWin,
"_ZNK14wxSplashScreen12GetClassInfoEv" ),

-- wxSplashScreen::GetEventTable() const
wxSplashScreen_GetEventTable = define_c_var( wxWin,
"_ZNK14wxSplashScreen13GetEventTableEv" ),

-- wxSplashScreen::GetSplashStyle() const
wxSplashScreen_GetSplashStyle = define_c_var( wxWin,
"_ZNK14wxSplashScreen14GetSplashStyleEv" ),

-- wxSplashScreen::GetSplashWindow() const
wxSplashScreen_GetSplashWindow = define_c_var( wxWin,
"_ZNK14wxSplashScreen15GetSplashWindowEv" ),

-- wxSplashScreen::GetTimeout() const
wxSplashScreen_GetTimeout = define_c_var( wxWin,
"_ZNK14wxSplashScreen10GetTimeoutEv" ),

-- wxSplashScreen::OnCloseWindow(wxCloseEvent&)
wxSplashScreen_OnCloseWindow = define_c_var( wxWin,
"_ZN14wxSplashScreen13OnCloseWindowER12wxCloseEvent" ),

-- wxSplashScreen::OnNotify(wxTimerEvent&)
wxSplashScreen_OnNotify = define_c_var( wxWin,
"_ZN14wxSplashScreen8OnNotifyER12wxTimerEvent" ),

-- wxSplashScreen::sm_classwxSplashScreen
wxSplashScreen_sm_classwxSplashScreen = define_c_var( wxWin,
"_ZN14wxSplashScreen22sm_classwxSplashScreenE" ),

-- wxSplashScreen::sm_eventTable
wxSplashScreen_sm_eventTable = define_c_var( wxWin,
"_ZN14wxSplashScreen13sm_eventTableE" ),

-- wxSplashScreen::sm_eventTableEntries
wxSplashScreen_sm_eventTableEntries = define_c_var( wxWin,
"_ZN14wxSplashScreen20sm_eventTableEntriesE" ),

-- wxSplashScreen::wxSplashScreen[in-charge](wxBitmap const&, long, int,
wxWindow*, int, wxPoint const&, wxSize const&, long)
wxSplashScreen_ctor = define_c_var( wxWin,
"_ZN14wxSplashScreenC1ERK8wxBitmapliP8wxWindowiRK7wxPointRK6wxSizel" ),

-- wxSplashScreen::wxSplashScreen[in-charge]()
wxSplashScreen_wxSplashScreen_1 = define_c_var( wxWin, "_ZN14wxSplashScreenC1Ev"
),

-- wxSplashScreen::wxSplashScreen[not-in-charge](wxBitmap const&, long, int,
wxWindow*, int, wxPoint const&, wxSize const&, long)
wxSplashScreen_wxSplashScreen_2 = define_c_var( wxWin,
"_ZN14wxSplashScreenC2ERK8wxBitmapliP8wxWindowiRK7wxPointRK6wxSizel" ),

-- wxSplashScreen::wxSplashScreen[not-in-charge]()
wxSplashScreen_wxSplashScreen_3 = define_c_var( wxWin, "_ZN14wxSplashScreenC2Ev"
),

-- wxSplashScreen::~wxSplashScreen [in-charge deleting]()
wxSplashScreen_dtor = define_c_var( wxWin, "_ZN14wxSplashScreenD0Ev" ),

-- wxSplashScreen::~wxSplashScreen [in-charge]()
wxSplashScreen_dtor2 = define_c_var( wxWin, "_ZN14wxSplashScreenD1Ev" ),

-- wxSplashScreen::~wxSplashScreen [not-in-charge]()
wxSplashScreen_dtor3 = define_c_var( wxWin, "_ZN14wxSplashScreenD2Ev" ),

sizeof_wxSplashScreen = CI:sizeof_class( wxSplashScreen_sm_classwxSplashScreen
),
wxSplashScreen = define_class( "wxSplashScreen", wxWin, wxSplashScreen_ctor,
sizeof_wxSplashScreen, wxSplashScreen_dtor )

-- end class wxSplashScreen
------------------------------

-- end autogenerated
------------------------------

global constant
wxSPLASH_CENTRE_ON_PARENT   = #01,
wxSPLASH_CENTRE_ON_SCREEN   = #02,
wxSPLASH_NO_CENTRE          = #00,
wxSPLASH_TIMEOUT            = #04,
wxSPLASH_NO_TIMEOUT         = #00

--wxSplashScreen(
--	const wxBitmap& bitmap, 
--	long splashStyle, 
--	int milliseconds, 
--	wxWindow* parent, 
--	wxWindowID id, 
--	const wxPoint& pos = wxDefaultPosition, 
--	const wxSize& size = wxDefaultSize, 
--	long style = wxSIMPLE_BORDER|wxFRAME_NO_TASKBAR|wxSTAY_ON_TOP)

--/topic wxSplashScreen
--/parent Classes
--/parent Controls
--/info
--include file: wxSplashScreen.e
--Creation parameters:
--<ul>
--/li bitmap
--/li splashStyle
--/li milliseconds
--/li parent
--/li id [= -1]
--/li x [= -1]
--/li y [= -1]
--/li cx [= -1]
--/li cy [= -1]
--/li style [= wxSIMPLE_BORDER|wxFRAME_NO_TASKBAR|wxSTAY_ON_TOP]'
--</ul>

-- wxSplashScreen::wxSplashScreen[in-charge](wxBitmap const&, long, int,
wxWindow*, int, wxPoint const&, wxSize const&, long)
constant default_splash = { 0, 0, 0, 0, -1, wxDefaultPosition, wxDefaultSize, 
	wx_or_all( wxSIMPLE_BORDER & wxFRAME_NO_TASKBAR & wxSTAY_ON_TOP ) }
function new_wxSplashScreen( sequence params )
	sequence splash
	integer len
	splash = default_splash
	splash[1..4] = params[1..4]
	len = length(params)
	if len > 4 then
		splash[5] = params[5]
		if len > 6 then
			splash[6] = create( wxPoint, params[6..7] )
			if len > 8 then
				splash[7] = create( wxSize, params[8..9] )
				if len > 9 then
					splash[8] = params[10]
				end if
			end if
		end if
	end if
	return new_instance( wxSplashScreen, 0, splash )
end function
create_func( wxSplashScreen, routine_id("new_wxSplashScreen"))
-- END wxSplashScreen.e

Matt Lewis