EnableExplicit Procedure HideFromTaskBar(hWnd.i, Flag.l) Protected TBL.ITaskbarList CoInitialize_(0) If CoCreateInstance_(?CLSID_TaskBarList, 0, 1, ?IID_ITaskBarList, @TBL) = #S_OK TBL\HrInit() If Flag TBL\DeleteTab(hWnd) Else TBL\AddTab(hWnd) EndIf TBL\Release() EndIf CoUninitialize_() DataSection CLSID_TaskBarList: Data.l $56FDF344 Data.w $FD6D, $11D0 Data.b $95, $8A, $00, $60, $97, $C9, $A0, $90 IID_ITaskBarList: Data.l $56FDF342 Data.w $FD6D, $11D0 Data.b $95, $8A, $00, $60, $97, $C9, $A0, $90 EndDataSection EndProcedure RunProgram("notepad.exe") Delay(2000) HideFromTaskBar(FindWindow_("notepad",#Null),1) ; IDE Options = PureBasic 5.11 (Windows - x86) ; CursorPosition = 8 ; Folding = - ; EnableXP ; EnableUser