Hi
Is it possible to use the Windows Notification Service via FW ?
#define NIIF_NONE 0x00000000
#define NIIF_INFO 0x00000001
#define NIIF_WARNING 0x00000002
#define NIIF_ERROR 0x00000003
#define NIIF_USER 0x00000004
#define NIIF_NOSOUND 0x00000010
#define NIIF_LARGE_ICON 0x00000020
#define NIIF_RESPECT_QUIET_TIME 0x00000040
#define NIIF_ICON_MASK 0x0000000F
#define NIM_ADD 0x00000000
#define NIM_MODIFY 0x00000001
#define NIM_DELETE 0x00000002
#define NIM_SETFOCUS 0x00000003
#define NIM_SETVERSION 0x00000004
#define WIN_LR_DEFAULTSIZE 0x00000040
#define WIN_IMAGE_ICON 0x00000001
//----------------------------------------------------------------------------//
function Main()
local nUuid
local cText := "En un lugar de la Mancha de cuyo nombre no quiero acordarme, vivía un hidalgo caballero"
nUuid := win_UuidCreateString()
win_ShellNotifyIcon( , nUuid, 2, , , .F., , , , )
win_ShellNotifyIcon( , nUuid, 0, , "My tooltip", .T., hb_AnsiToOem( cText ), 10000, "Title info", NIIF_WARNING + NIIF_RESPECT_QUIET_TIME )
return nil
Natter wrote:Thank you, Cristobal! This is what we need. At the same time, I will rebuild my program for Harbour. Is it possible to cause a full message window to appear (as if you click on the right button on the taskbar - Notifications)?
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 39 guests