Unit DragBar

Classes

TDragBar -

Functions

Register - ==============================================================================

Types

TBarStyle
TBarType

Constants

DragBarVersion

Variables


Functions


procedure Register;

==============================================================================

Types


TBarStyle = (bsDynamic, bsSolid, bsFrame);

TBarType = (btHorz, btVert);

Constants

DragBarVersion = '1.2'

VCL to create a panel that can be dragged by the user. By attaching a window, that window will be stretch to fit. Author: William R. Florac Company: FITCO, Verona, WI (wee little company from my house) Copyright 1997, FITCO. All rights reserved. 1) Users of DragBar (and it's components) must accept this disclaimer of warranty: "DragBar is supplied as is. The author disclaims all warranties, expressed or implied, including, without limitation, the warranties of merchantability and of fitness for any purpose. The author assumes no liability for damages, direct or conse- quential, which may result from the use of DragBar." 2) This Software is donated to the public as public domain except as noted below. 3) If you distribute this software, you must include all parts and pages without modification. 4) Software may be used, modified and distributed freely if compiled in with commercial or private applications (not another VCL). 5) Fitco retains the copyright to this Software. You may not distribute the source code (PAS) or its compiled unit (DCU) for profit. 6) If you do find this component handy and you feel guilty for using such a great product without paying someone, please send a few bucks ($25) to support further development. I have spent a lot of time making this VCL the best it can be and have included a help file to make it complete. 7) This file was formatted with tabs set to 2. 8) Thanks to all those who suggested (and got) improvements. 9) Latest version can always be found at http://sumac.etcconnect.com/fitco/ Please forward any comments or suggestions to Bill Florac at: email: flash@etcconnect.com mail: FITCO 209 Jenna Dr Verona, WI 53593 =============================================================================== version 1.0 notes: - Attached window must be aligned as alLeft, alRight, alTop or alBottom - Setting the Align will find a window to attach to if possible - Changing the BarType will remove any alignment and AttachedWindow - If you put controls on the Bar, you will have to click on the Bar to move it (not the components) - You can use this anywhere in a stack of aligned controls. I spent a lot of time making sure the controls stay in the same order! - The movement of the window is limited so the attached window will not get smaller than one (width or height). It seems the alignment will get lost if a value of 0 is set. - A DragBar without an AttachedWindow will not move - You can not attach onw DragBar to another - Only appropriate Align will be allow depending on the BarType. version 1.1 - fixed loading default widths by changing csReading test to csLoading version 1.2 - fixed order of sizing so attached window does not overwrite other windows during dynamic drag wishlist: - never could find a way to cancel the drag with the escape key ===============================================================================

Variables