Attached is a sample of the Task Panel control or Explorer Bar as some (including me) refer to it as; this control is found
in Windows XP.
As it is true in my other samples, this is not the most up to date and it's only to demostrate how to implement custom
controls in Access. It does work as it should, but i have not revised the code for quite some time.
I would love to discuss in depth the rationale in creating the control but unfortunately my time is very limited.
In the past I've been asked as to why i don't upload the latest up-to-date samples (with some attitude i might add) and my
answer is simple. Those are much more involved, they took time to develop as they contain custom classes, collections, and
images and I'm unable to share it with the general public at this time, and for that I apologize; however, i will be doing
some detailed tutorials on how to accomplish more roubust controls when the time allows it.
If anyone feels that i should not upload my samples, let me know and I shall stop.
The current sample is the container with the functions necessary to add, collapse, and expand the panes, as well as the
ability to add icons to a pane's header. You will have to create the panes your self to meet your needs.
'// instantiate class object
Set XTaskPanel = New cXTaskPanel
'// open object ref
'// load ui
'// add first pane and supply an icon
.Add 1, "XPane", "Picture Tasks", CurrentProject.Path & "icon_.bmp", False
'// add second and third with no icons and by default collpased
.Add 2, "XPane", "Task Pane 2", , True
.Add 3, "XPane", "Task Pane 3", , True
As usual, if you have questions please post in the forums with the exact same title. Enjoy.