OpenEuphoria

1. RE: Win32Lib v0.60.6 available

• Posted by "Elliott S. de Andrade" <quantum_analyst at hotmail.com> Sep 20, 2004
• 433 views
• Last edited Sep 21, 2004

>From: Derek Parnell <guest at RapidEuphoria.com>
>Reply-To: EUforum at topica.com
>To: EUforum at topica.com
>Subject: Win32Lib v0.60.6 available
>Date: Mon, 20 Sep 2004 04:52:37 -0700
>
>posted by: Derek Parnell <ddparnell at bigpond.com>
>

   Don't see any change with the IDE memory problem. No ideas?

>--
>Derek Parnell
>Melbourne, Australia
>

~[ WingZone ]~
http://wingzone.tripod.com/

=20
Technology=20=20
http://join.msn.com/?pgmarket=en-ca&page=byoa/prem&xAPID=1994&DI=10=
34&SU=http://hotmail.com/enca&HL=Market_MSNIS_Taglines=20
  Start enjoying all the benefits of MSN=AE Premium right now and get the=
=20
first two months FREE*.

3. RE: Win32Lib v0.60.6 available

• Posted by CoJaBo <cojabo at suscom.net> Sep 21, 2004
• 426 views

Derek Parnell wrote:
> 
> Elliott S. de Andrade wrote:
> > 
> > >From: Derek Parnell <guest at RapidEuphoria.com>
> > >Reply-To: EUforum at topica.com
> > >To: EUforum at topica.com
> > >Subject: Win32Lib v0.60.6 available
> > >Date: Mon, 20 Sep 2004 04:52:37 -0700
> > >
> > >posted by: Derek Parnell <ddparnell at bigpond.com>
> > >
> > 
> >    Don't see any change with the IDE memory problem. No ideas?

I occasionally get a BSoD(Blue Screen of Deet) when starting IDE,
but the computer turns off before I can read it(even though the
restart after errors optin is turned off).
After it starts up there is a ex.err file containing random
garbagge(looks like fragments of deleted files), and everything
runs fine for a while.


> 
> That's right. No ideas. I can't reproduce the problem on either of the
> two machines I have access to. I once had the problem but it went away
> when I removed the IDE and downloaded the latest version. I know you
> said you have done that but what more can I say? 
> 
> I had the problem.
> I did something.
> It went away.
> I cannot make it happen again here.
> 
> So I don't know how to help you. 
> 
> Has *anyone* else got this problem with the IDE?
Withe the latest IDE and Win32Lib, nothing hsappens when
double-clickinhg in the form design window.
This didn't happen with the previoud Qin32Lig.

> 
> -- 
> Derek Parnell
> Melbourne, Australia
>

5. RE: Win32Lib v0.60.6 available

• Posted by Matt Lewis <matthewwalkerlewis at yahoo.com> Sep 21, 2004
• 435 views

Derek Parnell wrote:
> 
> Oooops! I added a last minute change and forgot to retest the IDE. I've
> found the error in my code. You need to change findParentWindow() in
> the win32lib.ew file.  It should look like this ...
> 

Ok, I made this change, but now I'm getting errors in fDoSetFocus.  These
lines crash if lParentWindow = 0.  I'm testing using EDB:

if ctrl_Destroyed[id] != 0 or ctrl_Destroyed[lParentWindow] != 0 then
if (ctrl_Closed[lParentWindow] = 1) or (lParent !=0 and ctrl_Closed[lParent] =
1) then

Same deal in fDoKillFocus:

if ctrl_Destroyed[id] = 0 and ctrl_Closed[ lParentWindow ] != 1 then

...and fDoMouse:

if sequence(ctrl_Mousetrap[lParent]) then

Adding (lParent and XXX ) seems to make it work, although I didn't really
look at the rest of the code to see if this broke whatever was going
on in there.

Matt Lewis

7. RE: Win32Lib v0.60.6 available

• Posted by CoJaBo <cojabo at suscom.net> Sep 21, 2004
• 418 views
• Last edited Sep 22, 2004

Derek Parnell wrote:
> 
> CoJaBo wrote:
> > 
> > Derek Parnell wrote:
> > > 
> > > Elliott S. de Andrade wrote:
> > > > 
> > > > >From: Derek Parnell <guest at RapidEuphoria.com>
> > > > >Reply-To: EUforum at topica.com
> > > > >To: EUforum at topica.com
> > > > >Subject: Win32Lib v0.60.6 available
> > > > >Date: Mon, 20 Sep 2004 04:52:37 -0700
> > > > >
> > > > >posted by: Derek Parnell <ddparnell at bigpond.com>
> > > > >
> > > > 
> > > >    Don't see any change with the IDE memory problem. No ideas?
> > 
> > I occasionally get a BSoD(Blue Screen of Deet) when starting IDE,
> > but the computer turns off before I can read it(even though the
> > restart after errors optin is turned off).
> > After it starts up there is a ex.err file containing random
> > garbagge(looks like fragments of deleted files), and everything
> > runs fine for a while.
> 
> Hmmmm...could be the same thing. What Windows version etc you running?
XP Pro, reeally old Pentium 3 500MHZ, 256MB ram(that could be bad),
horribly fragmented and somwhat courupted 12GB hdd(another possible
problem) and it is full of dust and cat hair(or could THAT be the
problem?!)

(Don't worry, I'm getting an Athlon64 2.8GHz laptop with 2GB ram
and 100GB hdd soon!)


Also, I am trying to change a WS_POPUP window into a normal window,
but the titlebar still isn't displayed. Is there a way to do this?

include Win32Lib.ew
without warning

--------------------------------------------------------------------------------
--  Window w
sequence IDEFlags
IDEFlags = classDefaults(Window, { {1, {WS_SYSMENU}},{2, {0}} } )
constant w = createEx( Window, "Window1", 0, Default, Default, 400, 274,
{WS_POPUP}, 0 )
constant PushButton2 = createEx( PushButton, "Should make this a normal window",
w, 164, 92, 172, 28, 0, 0 )
constant PushButton3 = createEx( PushButton, "exit", w, 68, 60, 88, 28, 0, 0 )
---------------------------------------------------------
--------------------------------------------------------------------------------
procedure PushButton3_onClick (integer self, integer event, sequence
params)--params is ()
closeWindow(w)
end procedure
setHandler( PushButton3, w32HClick, routine_id("PushButton3_onClick"))
--------------------------------------------------------------------------------
procedure PushButton2_onClick (integer self, integer event, sequence
params)--params is ()
removeStyle(w,WS_POPUP)

addStyle(w,{WS_DLGFRAME+WS_SYSMENU+WS_MINIMIZEBOX,
WS_EX_DLGMODALFRAME})
end procedure
setHandler( PushButton2, w32HClick, routine_id("PushButton2_onClick"))


WinMain( w,Normal )

> 
> > > That's right. No ideas. I can't reproduce the problem on either of the
> > > two machines I have access to. I once had the problem but it went away
> > > when I removed the IDE and downloaded the latest version. I know you
> > > said you have done that but what more can I say? 
> > > 
> > > I had the problem.
> > > I did something.
> > > It went away.
> > > I cannot make it happen again here.
> > > 
> > > So I don't know how to help you. 
> > > 
> > > Has *anyone* else got this problem with the IDE?
> > Withe the latest IDE and Win32Lib, nothing hsappens when
> > double-clickinhg in the form design window.
> > This didn't happen with the previoud Qin32Lig.
> 
> Oooops! I added a last minute change and forgot to retest the IDE. I've
> found the error in my code. You need to change findParentWindow() in
> the win32lib.ew file.  It should look like this ...
> 
> 
> ----------------------------------------------------------
> global function findParentWindow(integer id)
> ----------------------------------------------------------
>     -- find the parent window
>     if (id <= 0) or (ctrl_Parent[id] = 0) then 
>         -- The specified control has no parent. 
>         return 0
>     end if
> 
>     -- loop until I hit top of the tree or a 'window'-type control.
>     while id and (ctrl_Type[id] != Window) and (isTopLevelWindow(id) =
>     w32False) do
>         -- move up
>         id = ctrl_Parent[ id ]
>     end while
>     return id
> end function
> -- 
> Derek Parnell
> Melbourne, Australia
>