OpenEuphoria

OT-Making a window dialog .. and balloons: Pete

• Posted by Antonio Alessi <a.admin at myway.it> Jul 05, 2006
• 518 views

Pete Stoner wrote:
> >snipped
> 
> Kenneth, If you want a tooltip to show more than the standard 80 characters
> see here..(warning, long URL!) 
> <a
> href="http://www.listfilter.com/cgi-bin/esearch.exu?thread=1&fromMonth=C&fromYear=A&toMonth=2&toYear=B&keywords=%22Win32Lib+????????????%22">http://www.listfilter.com/cgi-bin/esearch.exu?thread=1&fromMonth=C&fromYear=A&toMonth=2&toYear=B&keywords=%22Win32Lib+????????????%22</a>
> 
> On your other point about offscreen or other ways to hide a window, as usual
> there is more than
> one way to skin a cat (I hope Kat isn't reading this,,, it's just an English
> expression!! 
> 
> PeteS


Hi Pete,

should someone be interested, I got this running into the win32lib 59-1 too.

I have simply replaced the lText with allocate_string(lText) (no lenght check), 
like this: 

store( lParam, NMTTDISPINFO_szText, lText)
    VOID = w32Func(xSendMessage,{fetch(lParam, NMHDR_hwndFrom), 
    TTM_SETMAXTIPWIDTH, 0, lTextLen})

with:

    store( lParam, NMTTDISPINFO_lpszText, allocate_string(lText))
    VOID = w32Func(xSendMessage,{fetch(lParam, NMHDR_hwndFrom ), 
    TTM_SETMAXTIPWIDTH, 0, lTextLen})       	

and it works fine.

I have also replaced: 

classStyle[ToolTip] = or_all({TTS_ALWAYSTIP,TTS_BALLOON})

and obtained an nice ballon, adding an ICON and a TITLE if desired 
(but this goes to annoy, being the same for all) with

VOID = sendMessage( tooltipControl, TTM_ACTIVATE,
	1, " message Title")            -- 1 = icon flag

but I would like to submit a further question:

if you open the dialog to choose a folder by the selectDirectory(), you will
see the system context help '?' button to the upper right, near the 'x'.
Try it clicking everywhere on the tree and will get a very elegant tooltip,
rectangular but well spaced all around the text, and shadowed: 
do you know perhaps how to obtain these effects?

Thank you
antonio