OpenEuphoria

Re: Win4Eu update

• Posted by Matt Lewis <matthewwalkerlewis at yahoo.com> Oct 26, 2004
• 679 views

Derek Parnell wrote:
> 
> Bernard Ryan wrote:
> > 
> > Tommy Carlier wrote:
> > > 
> > > A little update on the progress of Win4Eu:
> > > 
> > > }}}
<eucode>
> > > include win4eu.ew
> > > 
> > > constant win = create(Window, "win", {10, 10, 300, 200})
> > > start(Application)
> > > </eucode>
{{{

> > > 
> > 
> > Tommy I don't see anything new except you have no parent
> > and no style; You can already do this using my w32engin.ew or win32lib.
> > 
> >  }}}
<eucode>
> >  include w32engin.ew
> >  
> > constant win = create(Window, "win", 0, 10, 10, 300, 200,0)
> > WinMain(win,Normal)
> > </eucode>
{{{

> > 
> While Bernie is correct, I suspect there are more wonders to be revealed
> yet in Tommy's approach.
> 
> BTW in win32lib, this could be done with ...
> 
> }}}
<eucode>
> include win32lib.ew
> createForm("Window, win, at=(10,10), size=(300,200)")
> include w32start.ew
> </eucode>
{{{

> 

And for completeness, here it is in wxEuphoria:

include wxEuphoria.e
constant win = create( wxWindow, {0, -1, 10, 10, 300, 200})

wxMain( win )

Ok, Irv's turn...

Matt Lewis