OpenEuphoria

Hey Matt L - Using tab controls, program crashes on Win98. Film at 11.

• Posted by Jonas Temple <jktemple at yhti.net> May 03, 2001
• 457 views

Matt,

I am re-sending this one :).  

I applied this patch and the program closes fine as long as the list 
views are never displayed.  If the list views are displayed the program 
crashes on close.

TIA for the help!

Jonas
Matthew Lewis wrote:
> 
> > -----Original Message-----
> > From: Jonas Temple [mailto:jktemple at yhti.net]
> 
> > Just got back around to applying this patch and I can't 
> > figure out where 
> > it goes into SubProc in Win32Lib.  Could you maybe include the entire 
> > SubProc function with the changes needed?  Thanks a bunch!
> 
> Here's the entirety of SubProc in my copy of Win32Lib (with formatting
> slightly mangled by email).  I've highlighted the new stuff...
> 
> -- begin code
> 
> function SubProc( atom hWnd, atom iMsg, atom wParam, atom lParam )
> -
> 
>     -- callback routine to handle Window class
>     -- This routine processes messages sent by Windows
> 
> integer
>       id
>     , lHandledEvent
> 
> object
>       result
>     -- find the control
>     id = getId( hWnd )
> 
>     -- not one of mine?
>     if id = 0
>     then     -- default processing
>         return True
>     end if
>     -- user can process events that Win32Lib doesn't have handlers for.
>     if   onEvent[ id ] >= 0
>       or onEvent[Screen] >= 0
>       or window_eventhandler[id][w32HEvent] >= 0
>       or window_eventhandler[Screen][w32HEvent] >= 0
>     then
>         pushSelf( id ) -- save the id for getSelf()
>         invokeHandler(id, w32HEvent, {iMsg, wParam, lParam} )
>         if sequence(myReturn[length(myReturn)])
>         then -- user supplied a return code, so return to Windows
>             return popSelf()
>         else
>             VOID = popSelf()
>         end if
> 
>     end if
<snip>