Unit JCheck |
TJCheck v1.00 by James Hargrave (hargrave@mep.com) Vancouver, BC Canada --------------------------------------------------------------------------- Copyright 1996 by Minds Edge Productions Inc. (info@mep.com) --------------------------------------------------------------------------- Revisions: v. 1.00 June, 13 1996 --------------------------------------------------------------------------- This Delphi control is freeware (ie. maybe used 100% free of charge) if you find it useful or have any: comments,source/controls of your own,bugs, suggestions, or anything please let me know. The author accepts no responsibility for its use or misuse. --------------------------------------------------------------------------- This file was origionally uploaded to The Delphi Super Page (DSP) (sunsite.ms.mff.cuni.cz/delphi/) which is maintained by Robert M. Czerwinski. I would like to thank Robert for his amazing service if there was (is?) an award for the absolute greatest delphi add-on/service/ product/person/anything the DSP would get my vote. :) --------------------------------------------------------------------------- This control is based on the source code found in BORBTNS.PAS by Enrico Lodolo. I would like to thank Enrico and any one else who releases their source code. Enrico Lodolo via F.Bolognese 27/3 - 440129 Bologna - Italy CIS 100275,1255 - Internet ldlc18k1@bo.nettuno.it The about this VCL property was based on code by Martyn Dowsett. --------------------------------------------------------------------------- Thanks to the following - People: Enrico Lodolo, Paul Thiessen, Eddie Karsai, Martyn Dowsett, Bruce Hargrave and Borland Int. Bands: Green Day, Everclear, No Doubt, Metallica and Rage against the Machine. TV Shows: The Simpsons, The Tick, Much Music and Music Plus Foods: Burger Kings (99 cent) Whopper Jr., Fruitopias Strawberry Passion Fruit Juice. --------------------------------------------------------------------------- I am releasing this in hopes that it will help someone learn more about Delphi which in turn will help spread the use of Borlands greatest creation to date. I would like to thank anyone who has distributed any files (especially full source) without it I'd still be coding in C. --------------------------------------------------------------------------- PERPOSE: This control was designed because I wanted a more flexable check box. --------------------------------------------------------------------------- PROPERTIES: This class is inherited from TCustomControl so has all of it's properties plus a few redeclarations. The following are new key properties: CheckedBitMap - This bitmap will be displayed when the check box is in it's checked state. Using this field and setting CheckType to ctBitMap you can display any graphic instead of just a check mark. UnCheckedBitMap - This bitmap will be displayed if the check box is in it's unchecked state and CheckType is set to ctBitMap. TransparentColor - This is the color of the bitmap that you would like to be transparent. Just like a glyph on a button. TextIndentSize - This is the space between the check box and the caption beside it. CheckBevelStyle - This is determines how the border around the check mark looks. (bvRaised, bvLowered or bvNone). CheckBevelWidth - This is the thickness of the border around the check mark. CheckBoxWidth - This is the size of the check box (Also See: SizeToBitMap). GrayedColor - When the state property is set to csGrayed this is the color the box will become. CheckColor - This is the color of the check mark (not used if you are using a bitmap. CheckType - This is what the check mark will look like: ctBitMap - Displays the bitmap set in the CheckedBitMap property. ctCheckMark - Displays a check mark. ctVCheckMark - Displays a slightly different check mark. ctCross - Displays an X. ctUserDraw - Not implemented yet. CheckWidth - This is the thickness of the check mark. SizeToBitMap - If this is set to TRUE the CheckBoxWidth property will be set to the size of the checked bitmaps height plus the size of the CheckBevelWidth. (Note: If the Unchecked bitmap is a different size then the checked bitmap this property will size to the checked bitmap size) StretchBitMaps - If this is TRUE then the bitmaps will be resized to fit in the check box. State - Same as the default Check box. About - Pops up a message box with the VCL credits. ---------------------------------------------------------------------------
Classes |
TAboutBoxEditor -
TAboutBoxObject - Types for the about box property editor
TJCheck -
Functions |
Register - ----------------------------------------------------------------
Types |
Constants |
Variables |
Functions |
Types |
TCheckType = (ctBitMap, ctCheckMark, ctVCheckMark, ctCross, ctUserDraw);Types for TJCheck
Constants |
Variables |