EnableExplicit Define Icon Define ILC If OpenWindow(0,0,0,500,250,"Window",#PB_Window_SystemMenu|#PB_Window_ScreenCentered) ListIconGadget(1,10,10,480,230,"",0,0) SetGadgetAttribute(1,#PB_ListIcon_DisplayMode,#PB_ListIcon_LargeIcon) ExtractIconEx_("shell32.dll",2,@Icon,0,1) ILC = ImageList_Create_(64,64,#ILC_COLOR32 | #ILC_MASK,0,0) ImageList_ReplaceIcon_(ILC,-1,Icon) SendMessage_(GadgetID(1),#LVM_SETIMAGELIST,#LVSIL_NORMAL,ILC) AddGadgetItem(1,-1,"Testitem") Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow EndIf