Flashing msginfo().. msgstop().. and msgalert()..

[fraxzi]

Dear all,

How can I make Msgxxx() flashing like twice.. getting user's attention?


Regards,
Fraxzi

[Antonio Linares]

Frances,

You have to implement your own functions Msg...() replacements and use a timer to hide and show the text so it flashes

[James Bott]

Personally, I hate flashing. Most users I ask also hate it. I don't think it is a good user interface design.

Perhaps if you explain the situation, we might come up with a better solution.

James

[fraxzi]

Frances,

You have to implement your own functions Msg...() replacements and use a timer to hide and show the text so it flashes

Mr. Antonio,

In fact, I have that function.. but what I want to flash is the dialog/window of Msg..() function like when dialog is modal when clicking the mouse outside of that dialog..


Regards,
Frances

[fraxzi]

Personally, I hate flashing. Most users I ask also hate it. I don't think it is a good user interface design.

Perhaps if you explain the situation, we might come up with a better solution.

James

Dear James,

Just like a modal dialog when you click the mouse outside.. My user requested for flashing window.. not only the text..


Regards,
Frances

[James Bott]

Frances,

Just like a modal dialog when you click the mouse outside.. My user requested for flashing window.. not only the text..

Since the user could click anywhere outside the dialog, even on another program, this would require dealing with the windows event queue--not simple. Further, the user would not be able to switch to another program. Most users would hate this.

The customer is always right. However, a user is not always the customer (the one who pays the bills). And I don't generally let users design interfaces--they don't really understand them. The best interface is no interface--less is more. This is a concept hard to grasp.

First I try to understand the problem. Why is your user requesting this? What is happening that they are trying to fix? If we can understand the problem, then maybe we can find a better solution.

James

[mmercado]

Hello All:

I understand the requirement of Frances and his users, and I think that would be better to make flash the label in the taskbar when the program is waiting for a user response (the case of modal messages), does someone know how to do it from a FWH program?

Best regards.

Manuel Mercado Gómez.

[fraxzi]

Dear All,

Perhaps to simulate a mouse click outside the msg...() function will make it flash.. so how to trigger mouse click after msg...() function?


Regards,
Frances

[Daniel Garcia-Gil]

Hello Frances

please test this sample

Left Click over window, set ON flashing
Right Click over window, set OFF flashing

Code: Select all  Expand view

#include "fivewin.ch"


#define FLASHW_ALL       0x03 //Flash both the window caption and taskbar button. This is equivalent to setting the FLASHW_CAPTION | FLASHW_TRAY flags.
#define FLASHW_CAPTION   0x01 //Flash the window caption.
#define FLASHW_STOP      0x00 //Stop flashing. The system restores the window to its original state.
#define FLASHW_TIMER     0x04 //Flash continuously, until the FLASHW_STOP flag is set.
#define FLASHW_TIMERNOFG 0x0C //Flash continuously until the window comes to the foreground.
#define FLASHW_TRAY      0x02 //Flash the taskbar button.

FUNCTION MAIN
   LOCAL oWnd
   
   DEFINE WINDOW oWnd
   
   oWnd:bLClicked = { || FlashWindow( oWnd:hWnd, FLASHW_ALL ) }
   oWnd:bRClicked = { || FlashWindow( oWnd:hWnd, FLASHW_STOP ) }
   
   ACTIVATE WINDOW oWnd
   
RETURN NIL
   


#pragma BEGINDUMP
#include <windows.h>
#include <hbapi.h>

HB_FUNC( FLASHWINDOW )
{
    FLASHWINFO * pFlash = ( FLASHWINFO * ) hb_xgrab( sizeof( FLASHWINFO )  );
    INT uCount = 100;
   
   
    if( hb_pcount() > 2 )
       uCount = hb_parni( 3 );
       
    memset( pFlash, 0, sizeof( FLASHWINFO ) );
   
    pFlash->cbSize    = sizeof( FLASHWINFO );
    pFlash->hwnd      = ( HWND ) hb_parnl( 1 );
    pFlash->dwFlags   = hb_parnl( 2 );
    pFlash->uCount    = uCount;
    pFlash->dwTimeout = 0;
   
    FlashWindowEx( pFlash );
   
    hb_xfree( pFlash );

}

[armando.lagunas]

hola:

el código que publico, hace que aparezca un dialogo en la parte inferior izquierda, y el texto lo saco es de 500 caracteres, partido en 5 partes de 100 caracteres c/u de una tabla DBF, y el dialogo después de 9 segundos desaparece.

Código:

Code: Select all  Expand view

#define CRLF Chr(13)+Chr(10)

FUNCTION MsgTray(  oWnd, cIndice )
LOCAL DlgTray, cText
   SELECT ALERTAS
   SEEK cIndice
   IF !EOF()    
       cText := ALLTRIM(ALERTAS->TEXTO1+CRLF+ALERTAS->TEXTO2+CRLF+ALERTAS->TEXTO3 ;
                       +CRLF+ALERTAS->TEXTO4+CRLF+ALERTAS->TEXTO5)
   ELSE        
       cText := "CODE: "+cIndice+"Indice no encontrado !!"
   ENDIF
 
   DEFINE DIALOG DlgTray RESOURCE 14 OF oWnd
      REDEFINE SAY PROMPT cText ID  11 OF DlgTray
      REDEFINE BUTTON                ID  10 OF DlgTray  ACTION DlgTray:End()
      DlgTray:lHelpIcon := .F.
   ACTIVATE DIALOG DlgTray NOWAIT ;
            ON INIT ( DlgTray:MOVE((oWnd:nHeight() - 180 ), ;
                         (oWnd:nWidth() - 365 )), ;
                          TrayTimer( DlgTray ), ;
                         IIF(!SndPlaySound(".\SYSTEM\SONIDO.WAV",1),MsgBeep(),)  )
RETURN Nil

//----------------------------------------------------------------------

STATIC FUNCTION TrayTimer( DlgTray )
LOCAL oTmr
   DEFINE   TIMER oTmr OF DlgTray INTERVAL 9000 ACTION DlgTray:End()
   ACTIVATE TIMER oTmr
RETURN nil

 

el dialogo lo hice con el resource workshop y la particularidad que debe tener el say, es marcar el "control type" que sea "left text no wrap"

a mi me funciona muy bien.

espero que te sirva

saludos desde Chile.

[fraxzi]

Hello Frances

please test this sample

Left Click over window, set ON flashing
Right Click over window, set OFF flashing

Code: Select all  Expand view

#include "fivewin.ch"


#define FLASHW_ALL       0x03 //Flash both the window caption and taskbar button. This is equivalent to setting the FLASHW_CAPTION | FLASHW_TRAY flags.
#define FLASHW_CAPTION   0x01 //Flash the window caption.
#define FLASHW_STOP      0x00 //Stop flashing. The system restores the window to its original state.
#define FLASHW_TIMER     0x04 //Flash continuously, until the FLASHW_STOP flag is set.
#define FLASHW_TIMERNOFG 0x0C //Flash continuously until the window comes to the foreground.
#define FLASHW_TRAY      0x02 //Flash the taskbar button.

FUNCTION MAIN
   LOCAL oWnd
   
   DEFINE WINDOW oWnd
   
   oWnd:bLClicked = { || FlashWindow( oWnd:hWnd, FLASHW_ALL ) }
   oWnd:bRClicked = { || FlashWindow( oWnd:hWnd, FLASHW_STOP ) }
   
   ACTIVATE WINDOW oWnd
   
RETURN NIL
   


#pragma BEGINDUMP
#include <windows.h>
#include <hbapi.h>

HB_FUNC( FLASHWINDOW )
{
    FLASHWINFO * pFlash = ( FLASHWINFO * ) hb_xgrab( sizeof( FLASHWINFO )  );
    INT uCount = 100;
   
   
    if( hb_pcount() > 2 )
       uCount = hb_parni( 3 );
       
    memset( pFlash, 0, sizeof( FLASHWINFO ) );
   
    pFlash->cbSize    = sizeof( FLASHWINFO );
    pFlash->hwnd      = ( HWND ) hb_parnl( 1 );
    pFlash->dwFlags   = hb_parnl( 2 );
    pFlash->uCount    = uCount;
    pFlash->dwTimeout = 0;
   
    FlashWindowEx( pFlash );
   
    hb_xfree( pFlash );

}

Hello Daniel,

I added '#pragma ENDDUMP' at the end of your sample..

It worked great as this is ideal behavior.. I will integrate this to my generic Msg...() function so I can flash the dialog/window..
Great visual notification!!

Thank you and Mabuhay!


Frances

[Otto]

mygeneric Msg...() function

Dear Frances,
Maybe you are so kind to share what other goodies you have in your function?
Thanks in advance,
Otto

[fraxzi]

mygeneric Msg...() function

Dear Frances,
Maybe you are so kind to share what other goodies you have in your function?
Thanks in advance,
Otto

Dear Otto,

Of course.. as always a Fivewinner.. I share what I have.. My generic Msg...() function or other FW are much common.. not fancy.. not new class..
I share some thoughts and tip too..

Thank you so much for the community and our gurus here who provide and shared with us..

My gratitude.

My best regards,
Frances