Codejock Developer Community : Taskpanel Remove item

Taskpanel Remove item : Yes you are right, I didn't...

Wed, 13 Oct 2004 09:31:01 +0000

Author: SuperMario
Subject: 1274
Posted: 13 October 2004 at 9:31am

Yes you are right, I didn't see that you said you were using 9.1. TaskPanelItem is an Interface added in 9.5. I would recommenddownloading the latest version if you can.

Taskpanel Remove item : Shouldn't Private item As...

Wed, 13 Oct 2004 08:07:47 +0000

Author: Woody
Subject: 1274
Posted: 13 October 2004 at 8:07am

Shouldn't Private item As XtremeSuiteControls.TaskPanelItem be Private item As XtremeSuiteControls.TaskPanelGroupItem ?

first one isn't recognised, and this may be the problem.

Taskpanel Remove item : Ianp's code does work. Try...

Wed, 13 Oct 2004 07:15:32 +0000

Author: SuperMario
Subject: 1274
Posted: 13 October 2004 at 7:15am

Ianp's code does work.

Try changing to this code, it will let you see the item that is being removed:
Set item = group.Items.Add(ID_TASK_FIND_COMPANY_ITEM1, "Some Text", xtpTaskItemTypeText)

This is assuming that you want to remove an item within a group and not an entire group.

Taskpanel Remove item : I tried this out and I still get...

Wed, 13 Oct 2004 06:43:49 +0000

Author: Woody
Subject: 1274
Posted: 13 October 2004 at 6:43am

I tried this out and I still get error 'Object doesn't support this property or method'
Using version 9.1, could this be a bug?

Taskpanel Remove item : Hi Woody You can remove an item...

Wed, 13 Oct 2004 05:44:49 +0000

Author: ianp
Subject: 1274
Posted: 13 October 2004 at 5:44am

Hi Woody

You can remove an item using Group.Items.Remove(1) however as it doesn't then return an TaskItem, your code will fail when you try to Set Item = Group.Items.Remove(1)

The following code should work if you place it in a form with a taskpanel (wndTaskPanel) and a command button (command1). It will also allow you to specify your ID for the taskitem rather than having to know the Index position...

Const ID_TASK_FIND_COMPANY_GROUP1 As Long = 640
Const ID_TASK_FIND_COMPANY_ITEM1 As Long = 641
Private group As XtremeSuiteControls.TaskPanelGroup
Private item As XtremeSuiteControls.TaskPanelItem
Private Sub Command1_Click()
  Set group = wndTaskPanel.Groups.Find(ID_TASK_FIND_COMPANY_GROUP1)
  Debug.Print group.Items.Count
  Set item = group.Items.Find(ID_TASK_FIND_COMPANY_ITEM1)
  item.Remove
  Debug.Print group.Items.Count
End Sub
Private Sub Form_Load()
  Set group = wndTaskPanel.Groups.Add(ID_TASK_FIND_COMPANY_GROUP1, "Company Search")
  Set item = group.Items.Add(ID_TASK_FIND_COMPANY_ITEM1, "", xtpTaskItemTypeControl)
End Sub

Edited by ianp

Taskpanel Remove item : Thanks for trying, but that didn't...

Wed, 13 Oct 2004 05:27:18 +0000

Author: Woody
Subject: 1274
Posted: 13 October 2004 at 5:27am

Thanks for trying, but that didn't work either.

I thought Remove should work like this:

Const ID_TASK_FIND_COMPANY_GROUP1 = 640

Set Group = wndTaskPanel.Groups.Add(ID_TASK_FIND_COMPANY_GROUP1, "Company Search")

Set Item = Group.Items.Add(ID_TASK_FIND_COMPANY_ITEM1, "", xtpTaskItemTypeControl)

Then:
Set Group = wndTaskPanel.Groups.Find(640)
Set Item = Group.Items.Remove(1)

What am I doing wrong?

Taskpanel Remove item : Hi, I may not be the best person...

Tue, 12 Oct 2004 15:31:39 +0000

Author: gshawn
Subject: 1274
Posted: 12 October 2004 at 3:31pm

Hi,

I may not be the best person to answer since I've only used the Suite for a couple of hours, but this is one way to remove an item:

wndTaskPanel.Groups(1).Items(1).Remove

That will remove the first item from the first panel. I hope this helps at least a little.

Taskpanel Remove item : Does anyone have a working example...

Tue, 12 Oct 2004 15:21:09 +0000

Author: Woody
Subject: 1274
Posted: 12 October 2004 at 3:21pm

Does anyone have a working example of how to remove aTaskPanelGroupItem using the Remove method? I'm having to useGroup.Items.Clear, and then add them again, but this is causingproblems and I can't find any documentation.