Readme file for TCadComboBox and TCadListBox

This Component is a enhanced listbox like seen on a famous cad program.
It is based on the SKDLIST.ZIP by robert@alpine.net 
You can add up to 8 "toggle" bitmaps,stored in a TImageList.
The status of these buttons is stored in an object within the CadComboBox.
With double clicking on any of the bitmaps, you can change their status.
****************************
New properties:
Imagelist:Holds the bitmaps. The bitmap with index zero (0) will
          be seen if the according flag is set to false.
          Image 1..Image 7 are the images of the according flags.
          Note, that if property ShowEmptyFlags=false you wont see Bitmap Index 0!

FlagCount:Here you select the number of toggle buttons (0..8). If this value is bigger
          than the maximum Imaglist index you may see nothing.

ShowEmptyFlag:See above
*****************************
New Events:
OnFlagClick:Whenever you click on a bitmap, it toggles and this event is fired.
*****************************
New Procedures/functions:
procedure AddEntry:Since the flag values are stored in attached objects of the
                   the tstrings object you may NOT use CadlistBox.items.add('xxxxx'). Instead,
                   you should use AddEntry(s:string;flags:byte);

function GetFlag(Index:integer;FlagNumber:byte):boolean
         Get the flag status of the given index.

procedure SetFlag(Index:integer;Flagnumber:byte;Flag:boolean);
          Sets one single flag within the tstrings object.

For further details look into the code. Just go down!

To use the component:
Drop a TlistBox and fill it with up to eight pictures (do not use too big ones)
Drop the CadListBox and fill the Imagelist property.
Add strings programmatically with the AddEntry-procedure. Do not use items.add etc.
Check/Change the flags of the strings with the mouse or with Get/Setflag.
Thats it.
*****************************

(p)1998 by Bernhard Knibbe.

This component is freeware.
Do with it whatever you want, but dont blaim me for anything.
Thanks to all who offer free components to the Delphi Super Page!!!

Bernhard Knibbe
Vienna, Austria
b_knibbe@csi.com
http://ourworld.compuserve.com/homepages/b_knibbe

Please report any bugs/problems/improvements!