OpenEuphoria

1. a "code wanted" page?

• Posted by useless Jul 17, 2011
• 1986 views

Is there a "code wanted" page on Euphorum somewhere?

I still need a way to get the popup text from a systray icon. The app has no taskbar tab, no window opens, winxp's tasklist shows no change in the app data from one popup txt to the next (as the app's condition changes), neither does Greg Haberek window monitor.

I would like to know what text would pop up if i moused over the icon, but from inside an Eu app, without popping up the taskbar/systray or moving the mouse. Sending mousemove msgs to all the icons seems reasonable, but i still do not know how to get the systray's icon list, it's icon's names, or how to send each of them a msg, or how to get the popup txt back (especially not showing onscreen the popup).

useless

3. Re: a "code wanted" page?

• Posted by petelomax Jul 18, 2011
• 1848 views

FWIW, this code works with Phix/Arwen, but may take some massaging to work with Eu/Win32lib

-- cleanup code 
atom hWnd = 0 
procedure fw(sequence class, object name) 
    hWnd = c_func(xFindWindowEx,{hWnd,0,class,name}) 
end procedure 
    fw("Shell_TrayWnd", 0) 
    fw("TrayNotifyWnd", 0) 
    fw("SysPager", 0) 
    fw("ToolbarWindow32", "Notification Area") 
constant pRect = allocate(sizeof(RECT)) 
    void = c_func(xGetClientRect,{hWnd,pRect}) 
integer w = peek4u(pRect+8) 
constant hh = floor(peek4u(pRect+12)/2) 
constant hhs = hh*#10000 
    free(pRect) 
    while w>0 do 
        void = c_func(xSendMessage,{hWnd, WM_MOUSEMOVE, hhs+w, 0}) 
        w -= hh 
    end while 

You will probably need to allocate_string() class and non-atom name, and sizeof(RECT) will be something different. Also, xFindWindow/xGetClientRect/xSendMessage may be something else namewise and need to be called via w32Func(), iirc.

HTH,
Pete

PS There was a mention that "Notification Area" might need localisation, not sure how you'd do that though.

5. Re: a "code wanted" page?

• Posted by mattlewis (admin) Jul 19, 2011
• 1776 views

From looking around, it looks like this sort of thing is triggered by some event, whether external (mouse over) or based on whatever the program is doing. And then the program throws up the notification. I don't think it's sitting there, queued up or anything where you could peek at it.

I'd guess that in order to do what you're looking to do, you'd probably need to periodically check to see if you could find the notification window. Though I don't know that you could read the text off of it anyways. I suspect you'll have to find another way to find out what's going on.

Matt