Using the TaskPanel in Access

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   I have been attempting to use the TaskPanel in Access and feel I am very close. However, I am having a hard time when I try to add a listbox as a group item. Is this possible? I first tried to use a subform but figured I may be pushing it with that. 

I am using the code below, which adds three groups and 2 listboxes as items, one in the 2nd and the other in the third group. 

I get no errors and everything looks ok accept of couse the that listboxes remain beside the taskpanel and are not added to it as desired. since I am using access as with vba there is no Handle property on the control and I am just specifying the name of the control as instructed in the tutorial. Any help would be appreciated.

Private Sub Form_Load()

    Dim Group As TaskPanelGroup
    Set Group = wndTaskPanel.Groups.Add(0, "Phone Call List")

    Set Group = wndTaskPanel.Groups.Add(0, "Appointments")

    Dim Item As TaskPanelGroupItem
    Set Item = Group.Items.Add(0, "", XTPTaskPanelItemType.xtpTaskItemTypeControl)
    Set Item.Control = Me.lstAppointments
    lstAppointments.BackColor = Item.BackColor
    Set Group = wndTaskPanel.Groups.Add(0, "Bookmarks")

    Set Item = Group.Items.Add(0, "", XTPTaskPanelItemType.xtpTaskItemTypeControl)
    Set Item.Control = Me.lstBookmarks
    lstBookmarks.BackColor = Item.BackColor

    wndTaskPanel.Reposition

End Sub

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
FSBarker Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 01 August 2007 Status: Offline Points: 1	Post Options Post Reply Quote FSBarker Report Post Thanks(0) Quote Reply Topic: Using the TaskPanel in Access Posted: 01 August 2007 at 9:29pm
	I have been attempting to use the TaskPanel in Access and feel I am very close. However, I am having a hard time when I try to add a listbox as a group item. Is this possible? I first tried to use a subform but figured I may be pushing it with that. I am using the code below, which adds three groups and 2 listboxes as items, one in the 2nd and the other in the third group. I get no errors and everything looks ok accept of couse the that listboxes remain beside the taskpanel and are not added to it as desired. since I am using access as with vba there is no Handle property on the control and I am just specifying the name of the control as instructed in the tutorial. Any help would be appreciated. Private Sub Form_Load() Dim Group As TaskPanelGroup Set Group = wndTaskPanel.Groups.Add(0, "Phone Call List") Set Group = wndTaskPanel.Groups.Add(0, "Appointments") Dim Item As TaskPanelGroupItem Set Item = Group.Items.Add(0, "", XTPTaskPanelItemType.xtpTaskItemTypeControl) Set Item.Control = Me.lstAppointments lstAppointments.BackColor = Item.BackColor Set Group = wndTaskPanel.Groups.Add(0, "Bookmarks") Set Item = Group.Items.Add(0, "", XTPTaskPanelItemType.xtpTaskItemTypeControl) Set Item.Control = Me.lstBookmarks lstBookmarks.BackColor = Item.BackColor wndTaskPanel.Reposition End Sub