From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=0.6 required=5.0 tests=BAYES_40,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,4e180de737833224
X-Google-Attributes: gid103376,public
From: Tom Halliley <Tom.Halliley@sd.aonix.com>
Subject: Re: Ada Java question
Date: 1997/02/28
Message-ID: <33170AB6.35D7@sd.aonix.com>#1/1
X-Deja-AN: 222196363
Sender: news@thomsoft.com (USENET News Admin @flash)
X-Nntp-Posting-Host: case
References: <33150EBD.1467@fn3.freenet.tlh.fl.us>
Organization: Aonix
Newsgroups: comp.lang.ada
Date: 1997-02-28T00:00:00+00:00
List-Id: <comp.lang.ada>


Kendal Van Dyke wrote:
> 
> I am trying to redefine the keyDown event so that I can do something
> when an arrow key is pressed while an applet is running, but I seem to
> be having a problem when I compile  - it's giving me errors saying that
> "Direct name, event, is not visible"
> 
> Here is my code. What's wrong with it?
> 
>   function keyDown(obj : access tank_obj;
> 
>                    e : event_ptr;
> 

Do you mean "event" here, rather than "e"?

>                    key : Integer) return boolean is
> 
>   begin
> 
>     CASE key IS
> 
>       WHEN event.UP => return true;
> 
>       WHEN event.DOWN => return true;
> 
>       WHEN event.LEFT => return true;
> 
>       WHEN event.RIGHT => return true;
> 
>       WHEN Others => return true;
> 
>     end CASE;
> 
>     return true;
> 
>   end keyDown;
> 


TomH
 
-------------------------------------------------------------------
J. Thomas Halliley | Principal Software Engineer |  619.824.0348
  tomh@aonix.com   |            Aonix            | San Diego,  CA