|
||
Added Office XP highlighting style. Fixed two bugs in the cListBar class: ForeColor and HelpText properties did not work correctly - thanks to Simon Horton. Added a method to the cListBarItems class to remove all items from a bar, and fixed an intermittent problem with removing the last item from a bar (item still showed and caused a crash if you clicked on it - thanks to Daniel). this. Prevented BarClick events from firing when the ListBar was resized - thanks to Billy Propes. |
vbAccelerator ListBar ControlAn accurate reproduction of the Microsoft Outlook Bar, incorporating a solid ComCtl32.DLL ListView implementation in VB for you to play with! The vbAccelerator ListBar control is an all-VB control which emulates the Outlook sidebar as accurately as possible. I was inspired to write it when I started playing with Microsoft's Spy++ utility and pointed it at Outlook's list bar (or "ShortcutBar" as it publicises itself to the world) and noticed that the main component of the ListBar was actually a standard COMCTL32.DLL ListView. FliesSo, having seen how the MS version worked, I figured there would be no problem implementing a ListView like this and next thing there would be a super accurate Outlook Bar just ready for playing with. Not to mention I could provide you with in-place editing without writing any code, and provide Background Bitmap support so easily! How hard could it be? Well, one day I will finally stop saying "How hard can it be?" and may even stop having to compile my code at 4:30am and dragging in to work the next day with flies buzzing around my head. One day. In the meantime, here are the results! Go download the S-Grid Control and you will have a serious pair of complementary tools for building real world UI solutions. Combine everything with the ultimate in Windows style using the CoolMenu/ToolBar/Rebar control and you're well on your way to having a killer business app! Objective GratificationOne of the differences between this control and many of the previous controls at vbAccelerator is that it h as a fully-fledged object model - bars are programmed using the cListBar object which is collected in the CListBars collection, and within a bar items are modified using a cListBarItem object which is collected in the cListBarItems collection. The collection is shown in the object model: vbAccelerator ListBar Object Model One of the issues with programming an object model like this is it is easy to get into problems with circular references; where objects are referred to by an external consumer of the control and by the control itself, which is also referred to by the consumer. Such problems can prevent the _Terminate event of objects ever firing. This situation is normally undesirable (causing memory leaks) but when you have subclassing and Win32 API controls it becomes uncontrollable, leading to UAE/GPFs whenever a form containing the control is closed. The object model coded in this control demonstrates one technique you can use to completely guarantee no possibility of a circular reference. The downside to the technique is that it requires more code to be run before an object is provided to the user. That isn't a problem in a control which is managing only a small number of objects, such as the Outlook bar (i.e. less than 1,000). But it would be unsuitable for use in a control like the vbAccelerator S-Grid control, which is currently capable of adding and displaying tens of thousands of objects at a reasonable speed. The Struture of the ListBar/Outlook BarListBar Structure The ListBar consists of 4 window parts:
Important Note About VB6 ImageListsPlease note that VB6 ImageList (from MSCOMCTL.OCX) doesn't work with this control under Windows 2000/XP. This is because the ImageList handle returned by the control isn't compatible with ComCtl32.DLL on those systems. Microsoft may have some sort of fix for this (see KB article KB811415) but currently the fix is only available by contacting Microsoft support directly and isn't redistributable. If you have a copy of this (MSCOMCTL.OCX version 6.0.97.1) to try it out then please let me know!.
|
|
|