depends on the tcl/tk version you're using I suppose and even if we test it 
with 8.4/8.5 who knows if we can 
always be forward compatible, it's a though call and I wouldn't make it...

about button with -relief flat, I agree, but they were already with a -relief 
flat so I suppose it has some 
differences.. also, I can't guarantee how it would look like with Chameleon...

KKRT

On Mon, Feb 19, 2007 at 09:40:42PM +1100, Arieh Schneier wrote:
> My point is that we can treat these labels as buttons and use the same
> global vars as they do. They will still work as long as we use them the same
> way they do. So this new global variable you are talking about already
> exists.
> 
> ----- Original Message ----- 
> From: "Youness Alaoui" <[EMAIL PROTECTED]>
> To: "Mailing list for developers and everyone helping AMSN"
> <amsn-devel@lists.sourceforge.net>
> Sent: Monday, February 19, 2007 8:56 PM
> Subject: Re: [Amsn-devel] 0.97 TODO
> 
> 
> > button.tcl doesn't have anything to do with %X %Y... I just looked and it
> seems the ::tk::ButtonUp { w }
> > doesn't check for mouse position... instead it only checks if %W is equal
> to $priv(window) which is a global
> > vars where it stores the last entered button.. in other words, on FocusOut
> it unsets $priv(window) so the
> > buttonRelease has a if %W == "" which is always false, so no $w invoke is
> called...
> > Should we do it that way (using yet another global variable) or use the
> %X/%Y calculation ?
> >
> > KKRT
> >
> > On Mon, Feb 19, 2007 at 08:55:52PM +1100, Arieh Schneier wrote:
> > > > Comments :
> > > > -  Find a way to really have the 'buttonrelease' behavior on buttons
> > > > Currently, in the buttonbar of a CW, when we ButtonPress on a button
> but
> > > move the mouse outside of the
> > > > button before releasing it, it still activates the button, the normal
> > > behavior would be to cancel the click if
> > > > the release is done outside of the button. We should maybe do someting
> > > like bind <<Button1>>
> > > > "handle_button_release %W %X %Y [list command to execute on bind]"
> > > > and have the handle_button_release {w x y command } {
> > > > if { $x > [winfo width $w] && $y > [winfo height $w] || $x < 0 && $y <
> 0 }
> > > { return } else {  uplevel eval
> > > > $command }
> > > > }
> > >
> > > That is already implemented for 'buttons' however those were changed to
> > > 'labels' I don't remember the exact reason why, but the comment in the
> code
> > > is: "#Buttons are now labels, to get nicer interface on Mac OS X".
> However
> > > if you want to just reuse the code from buttons and add it to 'labels'
> you
> > > could try just binding the events that you want in the label to the
> button
> > > events. Or you could copy the code and keep the bits you want. Anyway,
> all
> > > the code you want can be found in: button.tcl (...\Tcl\lib\tk8.4).
> > >
> > > Lio.
> > >
> > >
> >
> > -------------------------------------------------------------------------
> > > Take Surveys. Earn Cash. Influence the Future of IT
> > > Join SourceForge.net's Techsay panel and you'll get the chance to share
> your
> > > opinions on IT & business topics through brief surveys-and earn cash
> > >
> http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
> > > _______________________________________________
> > > Amsn-devel mailing list
> > > Amsn-devel@lists.sourceforge.net
> > > https://lists.sourceforge.net/lists/listinfo/amsn-devel
> >
> > -------------------------------------------------------------------------
> > Take Surveys. Earn Cash. Influence the Future of IT
> > Join SourceForge.net's Techsay panel and you'll get the chance to share
> your
> > opinions on IT & business topics through brief surveys-and earn cash
> > http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
> > _______________________________________________
> > Amsn-devel mailing list
> > Amsn-devel@lists.sourceforge.net
> > https://lists.sourceforge.net/lists/listinfo/amsn-devel
> >
> 
> 
> -------------------------------------------------------------------------
> Take Surveys. Earn Cash. Influence the Future of IT
> Join SourceForge.net's Techsay panel and you'll get the chance to share your
> opinions on IT & business topics through brief surveys-and earn cash
> http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
> _______________________________________________
> Amsn-devel mailing list
> Amsn-devel@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/amsn-devel

-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys-and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Amsn-devel mailing list
Amsn-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amsn-devel

Reply via email to