Code : Tout sélectionner
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#include <ListviewConstants.au3>
#include <Date.au3>
#include <GuiListView.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 708, 423, 192, 124)
$listview = GUICtrlCreateListView("INFO BHT|jsd niv 1|jsd niv 3|Autres", 4, 24, 701, 396)
_GUICtrlListView_JustifyColumn($listview, 0, 2)
_GUICtrlListView_JustifyColumn($listview, 1, 2)
_GUICtrlListView_JustifyColumn($listview, 2, 2)
_GUICtrlListView_JustifyColumn($listview, 3, 2)
GUICtrlSendMsg($listview, $LVM_SETCOLUMNWIDTH, 0, 250)
GUICtrlSendMsg($listview, $LVM_SETCOLUMNWIDTH, 1, 200)
GUICtrlSendMsg($listview, $LVM_SETCOLUMNWIDTH, 2, 150)
GUICtrlSendMsg($listview, $LVM_SETCOLUMNWIDTH, 3, 110)
_GUICtrlListView_EnableGroupView($listview)
$nb_jour_a_afficher = 20
for $i = 0 to $nb_jour_a_afficher
$date = _DateAdd('d',$i, _NowCalcDate())
_GUICtrlListView_InsertGroup($listview, -1, 0,$date)
GUICtrlCreateListViewItem("ajout item "&$i&"|||", $listview)
next
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd