Antonio Linares wrote:Richard,
Already implemented. There is a new FWPPC build to download.
Antonio,
Almost there !
There is a problem refreshing the screen after the msgrun ends trhe event
try something like :
@ 0, 120 BTNBMP OBTN4 FILE CurDir() + "\BMP\PARAM.bmp" SIZE 40, 40 OF oWnd NOBORDER CENTER ;
ACTION MsgRun( "Réorganisation en Cours...", "Veuillez Patienter", ;
{ || INXGEN() } )
function inxgen()
IF ! MsgYesNo( 'Voulez-vous Effectuer une réorganisation de vos fcichiers ?', 'Veuillez Confirmer' )
RETURN NIL
ENDIF
......
return nil
in this sample, the msgyesno box will remain painted as it overlaps the msgrun painting area
Another sample
@ 0, 120 BTNBMP OBTN4 FILE CurDir() + "\BMP\PARAM.bmp" SIZE 40, 40 OF oWnd NOBORDER CENTER ;
ACTION IF( MsgYesNo( 'Voulez-vous Effectuer une réorganisation de vos fcichiers ?', 'Veuillez Confirmer' ), ;
MsgRun( "Réorganisation en Cours...", "Veuillez Patienter", ;
{ || INXGEN() } ) , )
The msgyesno is the button action, the painting is perfect but you need to click anywhere at the end in order to erase the painting. It rzmains.
If i am not clear enough, let me know, i will try to hardcopy screens.
Richard