realbasic-nug
[Top] [All Lists]

Re: Wrong Canvas.MouseUp Event?

To: REALbasic NUG <realbasic-nug@lists.realsoftware.com>
Subject: Re: Wrong Canvas.MouseUp Event?
From: Tom <tom@helios.de>
Date: Thu, 30 Apr 2009 17:11:16 +0200
Authentication-results: mx.google.com; spf=neutral (google.com: 74.124.194.228 is neither permitted nor denied by best guess record for domain of realbasic-nug-bounces@lists.realsoftware.com) smtp.mail=realbasic-nug-bounces@lists.realsoftware.com
Delivered-to: listarchive@realsoftware.com
In-reply-to: <B40F8819-DFD2-4197-9AFD-7ED6662EEB07@declareSub.com>
References: <49F9709D.5080107@helios.de> <A2217C56-292D-4BF7-AD9C-32FAC9BA5E11@declareSub.com> <49F9AD3D.5020306@helios.de> <B40F8819-DFD2-4197-9AFD-7ED6662EEB07@declareSub.com>
Reply-to: REALbasic NUG <realbasic-nug@lists.realsoftware.com>
Sender: realbasic-nug-bounces@lists.realsoftware.com
User-agent: Thunderbird 2.0.0.21 (Macintosh/20090302)
Charles Yeomans wrote:
Such optional behavior almost always proves to be an annoyance for me.

I agree. So they should just change the documentation.

Instead, I suggest that you use this method.

Function IsMouseOver(X as Integer, Y as Integer) as Integer
  return (X >= 0) and (X < me.Left) and (Y >= 0) and (Y < me.Height)
End Function

Either add it to your custom button classes, as I do, or add it to all Canvas objects as an extension method.

Function IsMouseOver(extends c as Canvas, X as Integer, Y as Integer) as Integer
  return (X >= 0) and (X < c.Left) and (Y >= 0) and (Y < c.Height)
End Function

I did that already ;)

Cheers,

Tom

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>


<Prev in Thread] Current Thread [Next in Thread>