Smalltalk › Instantiations

How to add hover help to widgets that don't now support it

_‹ Previous Topic Next Topic _›

Classic

List

Threaded

7 messages Options

Louis LaBrunda

How to add hover help to widgets that don't now support it

Hi Group,

Does anyone have any ideas/hints/whatever as to how hover help can be added to widgets that don't support it now? I would be good with being able to catch an event that said the mouse was hovering over something. Also, any way to get a hover help to pop up with a supplied text (or hover help object with the text in it). Thanks in advance for any ideas.

Lou

--
You received this message because you are subscribed to the Google Groups "VA Smalltalk" group.
To unsubscribe from this group and stop receiving emails from it, send an email to [hidden email].
To post to this group, send email to [hidden email].
Visit this group at http://groups.google.com/group/va-smalltalk.
For more options, visit https://groups.google.com/groups/opt_out.

Louis LaBrunda

Re: How to add hover help to widgets that don't now support it

To answer my own question, it was easier than I thought it would be. Add the following in your #finalInitialize of the form or window that holds the widgets you want to add hover help to.

(self subpartNamed: 'The Form That Holds The Stuff You Want To Add Hover')
abtWhenPrimitive: #hoverHelpRequested
perform:
(DirectedMessage new
receiver: self;
selector: #displayHoverHelpInfo:;
arguments: (Array new: 1)).

and add: # displayHoverHelpInfo: that should look something like this:

displayHoverHelpInfo: hoverHelpCallData
"Display hover help information."
| item infoString |

item := hoverHelpCallData item.
infoString := *some code to decide the hover help to display based upon the item the mouse is over*.
infoString notNil ifTrue: [hoverHelpCallData labelString: infoString].

Lou

Thomas Koschate-2

Re: How to add hover help to widgets that don't now support it

On Thursday, October 17, 2013 4:36:26 PM UTC-4, Louis LaBrunda wrote:

infoString := *some code to decide the hover help to display based upon the item the mouse is over*.
infoString notNil ifTrue: [hoverHelpCallData labelString: infoString].

Lou, is this a typo, or because you've pulled out some code from a production system? It seems kind of silly to do a nil test on something you've just assigned.

Tom

Louis LaBrunda

Re: How to add hover help to widgets that don't now support it

Hi Tom,

On Friday, October 18, 2013 3:15:05 PM UTC-4, Thomas Koschate wrote:

On Thursday, October 17, 2013 4:36:26 PM UTC-4, Louis LaBrunda wrote:

infoString := *some code to decide the hover help to display based upon the item the mouse is over*.
infoString notNil ifTrue: [hoverHelpCallData labelString: infoString].

Lou, is this a typo, or because you've pulled out some code from a production system? It seems kind of silly to do a nil test on something you've just assigned.

Tom

It would be silly/useless if #infoString was actually assigned but I was trying to show that it might not get assigned and then you wouldn't call #labelString: as it pops up the hover help.

Lou

Louis LaBrunda

Re: How to add hover help to widgets that don't now support it

In reply to this post by Louis LaBrunda

Hi All,

Interested parties may also want to look at #AbtEwHoverHelpCallbackData. #hoverArea answers the area (form) that contains the item under the pointer. #item contains the item under the pointer. If #hoverArea = #item, the pointer is hovering over the form and not any other item in the form therefor you may not want to display any hover help.

Lou

Julian Ford

Re: How to add hover help to widgets that don't now support it

Hi there.

I have been using hover help in my product for some time.
But I have a situation taht I cannot seem to get to work.

I have a window that contains a Notebook, and on one page of that notebook,
I have a AbtContainerFlowedIconListView, that contains a collection of items.

I would very much like to add hover help in such a way that as the mouse passes
over a particular item, I can display a string appropriate for that particular item.

I use hover help elsewhere in the same manner presented in this thread,
but when I try to this for my icon container, I get a single hover event triggered
when the mouse is over the container. Although I have the mouse position,
I do not know how to obtain the item at that location.
Also, if the user moves the mouse, I do not get another hover help event until the
mouse is moved off the window, them back on again.

Has anyone managed to do this?
Any help would be greatly appreciated!!

Regards,
Julian

SebastianHC

Re: How to add hover help to widgets that don't now support it

Hi Julian,

I once had a similar issue,... I extended my widget in the Abt-Layer by:
"""""
setPostCreationSettings

super setPostCreationSettings.
self widget
abtWhenPointerMovedPerform: (
DirectedMessage new
receiver: self;
selector: #pointerMoved:;
arguments: (Array new: 1)).
"""""
and:

"""""
pointerMoved: aPoint
self signalEvent: #pointerMoved: with: aPoint
"""""

It is on yours then to write the handler for such event and trigger your
Hoverhelp...

Sebastian

Am 20.11.2013 09:20, schrieb Julian Ford:

> Hi there.
>
> I have been using hover help in my product for some time.
> But I have a situation taht I cannot seem to get to work.
>
> I have a window that contains a Notebook, and on one page of that
> notebook,
> I have a AbtContainerFlowedIconListView, that contains a collection of
> items.
>
> I would very much like to add hover help in such a way that as the
> mouse passes
> over a particular item, I can display a string appropriate for that
> particular item.
>
> I use hover help elsewhere in the same manner presented in this thread,
> but when I try to this for my icon container, I get a single hover
> event triggered
> when the mouse is over the container. Although I have the mouse position,
> I do not know how to obtain the item at that location.
> Also, if the user moves the mouse, I do not get another hover help
> event until the
> mouse is moved off the window, them back on again.
>
> Has anyone managed to do this?
> Any help would be greatly appreciated!!
>
> Regards,
> Julian
> --
> You received this message because you are subscribed to the Google
> Groups "VA Smalltalk" group.
> To unsubscribe from this group and stop receiving emails from it, send
> an email to [hidden email].
> To post to this group, send email to [hidden email].
> Visit this group at http://groups.google.com/group/va-smalltalk.
> For more options, visit https://groups.google.com/groups/opt_out.