GUI_EXPAND doesn't work on XP?

[this-is-me]

I haven't tried on anything other than XP, but this is an example from holger:

expandcollapse popup

#include <guiconstants.au3>
Opt("GuiOnEventMode", 0)
GUICreate("GUI with a treeview",340,200,-1,-1,BitOr($WS_MINIMIZEBOX,$WS_MAXIMIZEBOX,$WS_GROUP,$WS_CAPTION,$WS_POPUP,$WS_SYSMENU))
$maintree = GUICtrlCreateTreeview(10,10,170,150)
GUICtrlSetImage(-1,"shell32.dll",3,4); icon for default nonselected state
GUICtrlSetImage(-1,"shell32.dll",4,2); icon for default selected state

$aboutitem = GUICtrlCreateTreeviewitem("About",$maintree)
GUICtrlSetImage($aboutitem,"shell32.dll",23)

$generalitem = GUICtrlCreateTreeviewitem("General",$maintree)
GUICtrlSetImage(-1,"shell32.dll",15)

$toolsitem = GUICtrlCreateTreeviewitem("Tools",$maintree)
GUICtrlSetImage(-1,"shell32.dll",21)

$effectitem = GUICtrlCreateTreeviewitem("Effects",$generalitem)

$styleitem = GUICtrlCreateTreeviewitem("Styles",$generalitem)
GUICtrlSetImage(-1,"shell32.dll",24,2)
GUICtrlSetImage(-1,"shell32.dll",25,4)

$cmditem = GUICtrlCreateTreeviewitem("Commandline",$toolsitem)

$miscitem = GUICtrlCreateTreeviewitem("Misc",$toolsitem)


GUISetState(@SW_SHOW)

GUICtrlSetState($generalitem,$GUI_EXPAND)

While 1
  $msg = GUIGetMsg()
  Select
     Case $msg = -3
        ExitLoop
     Case $msg = $miscitem
        GUICtrlSetImage($maintree,"shell32.dlls",9,2)
        GUICtrlSetImage($maintree,"shell32.dlls",10,4)
   EndSelect
WEnd

GUIDelete()
Exit

This should expand the general item and show the subitems, but it does not.

Edited October 12, 2004 by this-is-me

[CyberSlug]

This also fails on Windows XP:

$TVM_EXPAND=0x1102
$TVE_EXPAND=0x2
$x = GUISendMsg($maintree, $TVM_EXPAND, $TVE_EXPAND, $generalitem)

I think I got the parameters right...

[this-is-me]

Hmmm... Has it ever worked? I only tried recently.

EDIT: Does it work using sendmessage with dllcall?

Edited October 12, 2004 by this-is-me

[Holger]

Yeah, it did work...

I check out now where the problem is...

Edit: found a problem in the CtrlSetState-function.

Send the bugfixing to Jon and JP (cc).

@this-is-me / CyberSlug: Thanks for information

Regards Holger

Edited October 12, 2004 by Holger

[Jon]

Done.