csr,

Your code prints "key up" just fine here.  More questions;

1.  Which version of FB are you using"
2.  Which operating system?
3.  What machine?

I'm compiling as follows:

  Runtime : Rntm Appearance.Incl
  CPU : Carbon

On Thursday, December 5, 2002, at 07:50  AM, csr@... wrote:

> Scott Spencer, here is my code, "key up" can never print:
>
>
> dim q as boolean
>
> local fn eventHandle
>
>    dim evtRecPtr as ptr to eventRecord
>
>    evtRecPtr = event
>
>    select evtRecPtr.what
>       case _keyDwnEvt
>          print "key down"
>       case _keyUpEvt
>          print "key up"
>       case _mButDwnEvt
>          print "mouse down"
>       case _mButUpEvt
>          print "mouse up"
>          q = _zTrue
>       case else
>          if evtRecPtr.what <> 6 then print evtRecPtr.what
>    end select
>
>    evtRecPtr.what = _nullEvt
>
> end fn
>
> q = _false
>
> on event fn eventHandle
>
> window 1, "Test", ( 0, 42) - ( 512, 342)
>
> do
>    handleevents
> until q
>
> do
> until fn button
>
> end
>
----
Scott Spencer
SJ3 Solutions
sj3@...
"Mac OS X Solutions and Support"