From: Tom Moran <tmoran@bix.com>
Subject: Re: GNAT, CLAW, and the right mouse button
Date: 1997/03/08
Date: 1997-03-08T00:00:00+00:00 [thread overview]
Message-ID: <332220C4.5127@bix.com> (raw)
In-Reply-To: 33208C2B.FF6D5DF@innocon.com
The demo version of CLAW, which you are using, did not subclass
controls. The current version does. So:
type hot_buttons is new claw.push_button.button_type with null record;
procedure When_Right_Button_Down
(Window_Button: in out hot_buttons;
Mouse_Params : in
Claw.Mouse_Params_Type;
Do_Default : in out Boolean);
works, ie, your When_Right_Button will be called when the rightmost
mouse button is clicked while over the push button. (Too many buttons
here!)
You might want to join the CLAW mailing list for quicker answers to your
questions.
To subscribe to the Claw mailing list, send a message to
Claw-request@rrsoftware.com with the message body being SUBSCRIBE.
prev parent reply other threads:[~1997-03-08 0:00 UTC|newest]
Thread overview: 2+ messages / expand[flat|nested] mbox.gz Atom feed top
1997-03-07 0:00 GNAT, CLAW, and the right mouse button Jeff Carter
1997-03-08 0:00 ` Tom Moran [this message]
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox