Block size of ListView columns

[devrandom]

How can I avoid to change the size of the columns of a listview?

Actually I use this solution, but is not very elegant :|

#include <ListViewConstants.au3>

Opt("GUIOnEventMode", 1)

GUICreate("GUI", 500, 500)

$list = GUICtrlCreateListView("C1|C2", 0, 0, 500, 500, BitOr($LVS_NOSORTHEADER, $LVS_SINGLESEL))
set_sizes($list)

GUISetState(@SW_SHOW)

GUISetOnEvent(-3, "_exit")

While 1
    set_sizes($list)
    ... other stuff ...
WEnd

Func _exit()
    Exit
EndFunc

Func set_sizes(ByRef $list)
    GUICtrlSendMsg($list, $LVM_SETCOLUMNWIDTH, 0, 80)
    GUICtrlSendMsg($list, $LVM_SETCOLUMNWIDTH, 1, 415)
EndFunc

Edited March 7, 2011 by devrandom

[Melba23]

,

not very elegant

Too right!

Try this:

#Include <GuiListView.au3>

Opt("GUIOnEventMode", 1)

GUICreate("GUI", 500, 500)

$list = GUICtrlCreateListView("C1|C2", 0, 0, 500, 500, BitOr($LVS_NOSORTHEADER, $LVS_SINGLESEL))
ControlDisable("GUI", "", HWnd(_GUICtrlListView_GetHeader($list))) ; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

GUISetState(@SW_SHOW)

GUISetOnEvent(-3, "_exit")

While 1
    Sleep(10)
    ;... other stuff ...
WEnd

Func _exit()
    Exit
EndFunc

And ControlEnable will allow you to adjust it again.

M23

[devrandom]

It works fine, thank you as always

Edited March 7, 2011 by devrandom