Unit DbNav97

***************************************************************************** tDbNav97 v1.5 Derived from tCustomPanel Properties Background : Background bitmap (like MS-IE). BackgroundStyle : Style of background bitmap (normal or stretched. CaptionStyle : Position of caption. Direction : Horizontal or vertival navigator. Style : show caption, bitmap or both. Inherited properties all properties from tDbNavigator. Events all events from tDbNavigator.

Classes

TAboutMeProperty - ********* tAboutMeProperty
tDbNav97 - tDbNav97
tNavBtn97 - tNavBtn97
tNavDatalink - tNavDatalink

Functions

Register -

Types

EVertNavClick
tNavBackType
tNavBtn97Style
tNavBtnType
tNavDirection
tNavGlyph
tNavigateBtn
TVertButtonSet

Constants

InitRepeatPause
RepeatPause
SpaceSize

Variables


Functions


procedure Register;


Types


EVertNavClick = procedure (Sender: TObject; Button: tNavigateBtn) of object

tNavBackType = (bkNormal, bkStretch);

tNavBtn97Style = set of (nsAllowTimer, nsFocusRect)

tNavBtnType = (btBitmap, btCaption, btBoth);

tNavDirection = (dirAuto, dirHorizontal, dirVertical);

tNavGlyph = (ngEnabled, ngDisabled);

tNavigateBtn = (nbFirst, nbPrior, nbNext, nbLast,
                  nbInsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh);

TVertButtonSet = set of tNavigateBtn

Constants

InitRepeatPause = 400

RepeatPause = 100

pause before repeat timer (ms)

SpaceSize = 5

pause before hint window displays (ms

Variables