Re: Swoop Example Five

Ok, so I have been looking at the
http://www.forth.com/fom/swiftforth/fom-serve/cache/95.html
SWOOP examples and I am starting to get it. I have my About box running via
your example.
It runs fine when I run:

ABOUT-GOMAIN

in the console as a test.

But when I tried either from MAIN.F ( as in the example five):

 MI_ABOUT COMMAND: ( -- )
    mHWND ABOUT-GOMAIN
    :: DialogBoxIndirectParam DROP ;

MI_ABOUT COMMAND: ( -- )
    mHWND ABOUT-GOMAIN ;

Although the About Box runs and looks great, I get an Access Violation
 EAX 00000006 00000000 00471260 APP +17
 EBX 0000089C 00000000 0047086A ABOUT-GOMAIN +155
 ECX 2504408B 00000000 00425A71 OSPACE +34

Am I missing

<something> BUILDS <something>

or, am missing the concept about how the Command Handlers work
from within a Class?

Also, I noticed that when I run my TEST.f for the ABOUT-GOMAIN,
if I then run MAIN, even if I EMTPY, that the ABOUT-GOMAIN has
not changed.

I noticed this with changing Brush colors too. If I reset
the App-Window brush from BLACK_BRUSH to GRAY_BRUSH,
I can only get the GRAY_BRUSH to paint if I restart SF.exe so that
seems to mean that the Class is not forgotten. Am I on track or not?

Jodell

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.381 / Virus Database: 214 - Release Date: 8/2/2002
----------------------------------------------------------------------
sftalk_at_forth.com      The SwiftForth programming discussion email list
To unsubscribe,  send subject "unsubscribe sftalk" to listar_at_forth.com
For help with listar commands, send subject "help" to listar_at_forth.com
Archives are located at http://www.forth.com/sftalk -- check them out!
Search the archives!    Visit http://www.forth.com/search for details.