Unit Label3dB

********************************************************* * Label3dBorder version 1.0 - 32 bit * * Copyright (C) April 22, 1997 Steen Hjelmstrand * * * *********************************************************** * Label with possibility of setting 5 different kinds * * of 3-dimensional borders and an option of vertical * * alignment of the caption. * * * * Border: * * Set "BorderStyle"-property in the ObjectInspector. * * * * Vertical alignment of caption: * * Set "VerticalAlign"-property in the ObjectInspector. * * * * NOTICE: * * 1) If you set the vertical alignment to "vaCenter" or * * "vaBottom" then wordwrapping is not possible. If Wordwrap * * is set to "True" the setting will be ignored. * * * * 2) This label has no "AutoSize"-property. I never use the * * "AutoSize"-property myself, as I don't find it reliable, * * so I didn't want to waste my time implementing it. * * Sorry about that, if you happen to be an incarnated * * Autosize-user :-) * * * * If you have comments or find bugs please email me: * * stone@image.dk * * Updates and other Delphi-stuff on * * http://www.image.dk/~stone/delphi/ *

Classes

TLabel3DBorder -

Functions

Register - Published declarations

Types

TBorderStyle
TVerticalAlign

Constants

Variables


Functions


procedure Register;

Published declarations

Types


TBorderStyle = (bsNone, bsLight, bsMedium, bsHeavy, bsFrame, bsRaisedFrame);

TVerticalAlign = (vaTop, vaCenter, vaBottom);

Constants


Variables