Unit RkCommon

========================================================================= RkCommon Unit This unit defines constants, types, and miscellaneous procedures and functions used by multiple component classes. Also declares the TRkAboutInfo class which is used by the TRkAboutBoxProperty editor. Developing Custom Delphi 3 Components Copyright © 1995-1997 by Ray Konopka =========================================================================} {$I DCDC.INC

Classes

Functions

DrawBorder - ==================================} {== Generic DrawBorder Procedure ==} {==================================
DrawCtl3DBorder - =======================================} {== Generic DrawCtl3DBorder Procedure ==} {=======================================

Types

TFrameStyle
TRkAboutInfo

Constants

LRBevelColor
LRFrameColor
PalettePage
TextAlignments
ULBevelColor
ULFrameColor

Variables


Functions


procedure DrawBorder( Canvas : TCanvas; Bounds : TRect; Style : TFrameStyle );

==================================} {== Generic DrawBorder Procedure ==} {==================================

procedure DrawCtl3DBorder( Canvas : TCanvas; Bounds : TRect );

=======================================} {== Generic DrawCtl3DBorder Procedure ==} {=======================================

Types


TFrameStyle = ( fsNone, fsFlat, fsGroove, fsBump, fsRecessed, fsRaised);

TRkAboutInfo = ( aiRkComponents );

Constants

LRBevelColor = ( clWindow, clBtnHighlight, clBtnShadow )

LRFrameColor = ( clWindow, clWindowFrame, clBtnHighlight, clBtnShadow, clBtnHighlight, clBtnShadow )

PalettePage = 'DCDC'

TextAlignments = ( dt_Left, dt_Right, dt_Center )

ULBevelColor = ( clWindow, clBtnShadow, clBtnHighlight)

Color Arrays

ULFrameColor = ( clWindow, clWindowFrame, clBtnShadow, clBtnHighlight, clBtnShadow, clBtnHighlight )

Frame Style Color constant arrays

Variables