[R] Splash dans WM_NOTIFY

[aulus]

Bonjour,

Je tente d'afficher un SplashText dans la fonction WM_NOTIFY dans l'intention de faire patienter l'utilisateur pendant le tri d'une ListView. Celle-ci s'affiche bien, mais elle est vide de tout message.
Voulant contourner ce dysfonctionnement, j'ai tenté de créer une GUI contenant un label dans la fonction WM_NOTIFY. Même résultat : la GUI s'affiche mais le label ne s'affiche pas. Cela n'est-il pas possible ?

Code SplashText :

Code : Tout sélectionner

Switch $hWndFrom
        Case GUICtrlGetHandle($myListView)
            Switch $iCode
                Case $LVN_COLUMNCLICK ; A column was clicked
                    SplashTextOn("", "Tri en cours..." & @CRLF & "Merci de patienter...", 300, 55, -1, -1, 49)
                                       $tInfo = DllStructCreate($tagNMLISTVIEW, $iLparam)
                                       Local $ColumnSorted = DllStructGetData($tInfo, 'SubItem')
                                       If $ColumnSortedPrev <> $ColumnSorted Then
                                       etc.
 

Code GUI :

Code : Tout sélectionner

Switch $hWndFrom
        Case GUICtrlGetHandle($myListView)
            Switch $iCode
                Case $LVN_COLUMNCLICK ; A column was clicked
                    $GUIsplash = GUICreate("Tri en cours...", 350, 50, (@DesktopWidth / 2) - (300 / 2), (@DesktopHeight / 2) - (50 / 2))
                    $LABELsplash = GUICtrlCreateLabel("Merci de patienter...",20,10,320,20)
                    GUISetState(@SW_SHOW)
                    $tInfo = DllStructCreate($tagNMLISTVIEW, $iLparam)
                    Local $ColumnSorted = DllStructGetData($tInfo, 'SubItem')
                    If $ColumnSortedPrev <> $ColumnSorted Then
                    etc.
 

[Hugues]

Salut,

Peut-être parce que le temps de traitement est trop rapide... Si tu mets un Sleep(3000) après ton SplashTestOn, ton message s'affiche....

Sinon utilises le TrayTip.

► Afficher le texte

Code : Tout sélectionner

#include <GuiListView.au3>
#include <ListViewConstants.au3>
#include <WindowsConstants.au3>
#include <GuiConstantsEx.au3>
#include <StructureConstants.au3>
#include <date.au3>

Opt('MustDeclareVars', 1)

Global $search_LV, $B_DESCENDING, $gui
$gui = GUICreate("ListView Sort by Column Click", 400, 300)
$search_LV = GUICtrlCreateListView("", 2, 2, 394, 268)
GUICtrlSendMsg($search_LV, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_GRIDLINES, $LVS_EX_GRIDLINES)
GUICtrlSendMsg($search_LV, $LVM_SETEXTENDEDLISTVIEWSTYLE, $LVS_EX_FULLROWSELECT, $LVS_EX_FULLROWSELECT)

_GUICtrlListView_AddColumn($search_LV, "Items", 100)
_GUICtrlListView_AddColumn($search_LV, "SubItems 1", 100)
_GUICtrlListView_AddColumn($search_LV, "SubItems 2", 100)
_GUICtrlListView_AddColumn($search_LV, "SubItems 3", 100)

Local $aItems[5000][4]
For $iI = 0 To UBound($aItems) - 1
    $aItems[$iI][0] = "Item " & $iI
    $aItems[$iI][1] = "Item " & $iI & "-1"
    $aItems[$iI][2] = "Item " & $iI & "-2"
    $aItems[$iI][3] = "Item " & $iI & "-3"
Next

_GUICtrlListView_AddArray($search_LV, $aItems)

_GUICtrlListView_SetColumnWidth($search_LV, 0, 75)
_GUICtrlListView_SetColumnWidth($search_LV, 1, 75)
_GUICtrlListView_SetColumnWidth($search_LV, 2, 75)
GUISetState()

GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
;~ _GUICtrlListView_RegisterSortCallBack($search_LV, False)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            ExitLoop
        Case $search_LV
            ; Kick off the sort callback
;~          _GUICtrlListView_SortItems($search_LV, GUICtrlGetState($search_LV))
;~          _GUICtrlListView_UnRegisterSortCallBack($search_LV)
    EndSwitch
WEnd

Func WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
    Local Static $ColumnSortedPrev = -1
    #forceref $hWnd, $iMsg, $iwParam
    Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR, $hWndListView, $tInfo
    $hWndListView = $search_LV
;~  If Not IsHWnd($search_LV) Then $hWndListView = GUICtrlGetHandle($search_LV)

    $tNMHDR = DllStructCreate($tagNMHDR, $ilParam)
    $hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
    $iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
    $iCode = DllStructGetData($tNMHDR, "Code")

    Switch $hWndFrom
;~      Case $search_LV
        Case GUICtrlGetHandle($search_LV)
            Switch $iCode
                Case $LVN_COLUMNCLICK ; A column was clicked
                    TrayTip("", "Tri en cours, veuillez patienter...", 1000)

                    Local $tInfo = DllStructCreate($tagNMLISTVIEW, $iLparam)
                    Local $ColumnSorted = DllStructGetData($tInfo, 'SubItem')
                    If $ColumnSortedPrev <> $ColumnSorted Then
                      If $ColumnSortedPrev > -1 Then _GUICtrlListView_UnRegisterSortCallBack($search_LV)
                      If $ColumnSorted = 1 Then
                          ConsoleWrite('Numeric: ' & _GUICtrlListView_RegisterSortCallBack($search_LV, True) & @CRLF)
                      Else
                          ConsoleWrite('Literal: ' & _GUICtrlListView_RegisterSortCallBack($search_LV, False) & @CRLF)
                      EndIf
                      $ColumnSortedPrev = $ColumnSorted
                    EndIf
                    _GUICtrlListView_SortItems($search_LV, DllStructGetData($tInfo, 'SubItem'))
                    TrayTip("", "Tri terminé", 1000)
                Case $NM_DBLCLK

                    msgbox(64,"",ControlListView($gui, "", $search_LV, "GetText", 1, 0))
            EndSwitch
    EndSwitch
EndFunc   ;==>WM_NOTIFY

 

[aulus]

Le Sleep est effectivement la solution... Grand merci Hugues !

[TommyDDR]

Votre temps de traitement est long et vous y ajoutez un sleep ?

[aulus]

Ch'sais bien mais sinon pas d'affichage ! J'ai limité l'attente à 1 s.

[TommyDDR]

Dans le cas d'une gui perso (non splash) avez vous essayé de forcer la fenêtre à se redessiner ?

Code : Tout sélectionner

_WinAPI_RedrawWindow($gui)

[Hugues]

Tu n'es pas obligé de mettre 1s, tu peux mettre moins...

Sleep(150) devrait suffire.

[aulus]

Dans le cas d'une gui perso (non splash) avez vous essayé de forcer la fenêtre à se redessiner ?

Code : Tout sélectionner

_WinAPI_RedrawWindow($gui)

J'ai essayé cette fonction. Mais sans succès : mon programme plante.
J'ai diminué le temps d'attente comme me le suggère Hugues.
Merci à tous deux.