Unit selstyle |
************************************************ Selstyle is a combination of 2 custom combo boxes that can interact with each other. TPvlColorCombo which allows you to select a color and TPvlPatternCombo which allows you to select a brushstyle. TPvlColorCombo Additional Properties : PatternCombo : The Patterncombo that it must synchronise with ColorValue: The Color currently selected Pattern: The BrushStyle that must be used in drawing the samples KeyDropDown : Does the down arrow drop the combo box? AllowWhite : Include white in the samples? TPvlColorCombo Additional Events : OnChange : The color has changed. TPvlPatternCombo Additional Properties : ColorCombo : The Colorcombo that it must synchronise with ColorValue: The Color that must be used in drawing the samples Pattern: The BrushStyle currently selected KeyDropDown : Does the down arrow drop the combo box? AllowClear : Include bsClear in the samples? TPvlPatternCombo Additional Events : OnChange : The Pattern has changed. This Source Code remains Copyrighted to CopyRight (c) 1997 PA van Lonkhuyzen It may be distributed/modified/used freely. The Author may be contacted via email peterv@global.co.za post P A van Lonkhuyzen PO Box 1041 Randpark Ridge 2156 South Africa ***************************************************) {$D-,L-} {Remove if you wish to debug this code
Classes |
TPvlColorCombo -
TPvlPatternCombo -
Functions |
Register -
Types |
Constants |
Variables |
Functions |
Types |
Constants |
Variables |