Unit rImprovedComps

DescriptionUsesClasses, Interfaces, Objects and RecordsFunctions and ProceduresTypesConstantsVariables

Description

rImprovedComps is set of enhanced components, usually introducing many new functions and fixing some bugs.

TrGroupBox - provide new type of groupbox with following functions: - headline caption with definable colors and possition; - 4 types of frames with definable colors; - min max buttons with automatical and animated functions; - gradient background or background image; - support dropping of files to box; - support automatic resizing of children components

TrImageEx - enhanced TImage with following functions: - bound label with definable possition; - drawing support for basic shapes (rect, elipse, halfelipse)

TrMemoEx - enhanced Memo component which provides highlighting of words in text according list of words or highlighting of text between start and stop tag

TrComboBoxEx - enhanced ComboBox component which provides automatic setting of dropdown listbox width according length of items text, multicolumn dropdown, and internal timer for delayed event after editing

TrButton - enhaced TButton with following functions: - new property ImagesDisabled which is used for disable state of button instead of DisableImageIndex, so the same image list as for toolbar and menus can be used

TrStringsHolder - non visual component containing Strings object for editing in design time and storing in application

TrEditDate - enhanced TEdit component which provides functionality for editing of date value

TrEditNum - enhanced TEdit component which provides functionality for editing of integer or float number

TrImageListEx - enhanced ImageList component which provides storing of images in external compressed resource file in design and runtime and can block storing images in DFM file for descendant modules, so list can be used in ihnerited forms

TrTabControlEx + TrPageControlEx - enhanced TabControl and PageControl - provides colored tabs, hottrack fonts, color and border; - close button in tabs; - function for reading active tab caption and changing of active tab - supports Themes, use rStyleHooks unit to add Styles support for XE2 and higher

Updated version compatible with Delphi2010+ and 64bit platform. Splash screen in demo version.

Overview

Classes, Interfaces, Objects and Records

Name Description
Class TAutoResizePos subcomponent for autosize functionality of this rGroupBox inside parent rGroupBox; parent AutoResizeChild property define columns and rows matrix, AutoResizePos properties define possition of child rGroupBox
Class TAutoResizeChild subcomponent for autosize functionality of child components; 1/ rGroupBox child controls are resized according AutoResizePos properties of child control; 2/ other child controls are resized according AutoResizeChild.ChildCompsPos property
Class TrGroupBox enhanced GroupBox supporting new frame, caption, gradient and minimalize buttons
Class TrImageEx TrImageEx - enhanced TImage with following functions: - bound label with definable possition - drawing support for basic shapes (rect, elipse, halfelipse)
Class TrMemoEx enhanced Memo component which provides highlighting of words in text according list of words or highlighting of text between start and stop tag
Class TDisplayedItems dropdown items properties for rComboBoxEx and rDBComboBox
Class TrComboBoxEx enhanced ComboBox component which provides automatic setting of dropdown listbox width according length of items text
Class TrButton TrButton - enhaced TButton with following functions: - new property ImagesDisabled which is used for disable state of button instead of DisableImageIndex, so the same image list can be use as for toolbar and menus
Class TrEditDate enhanced TEdit component which provides functionality for editing of date value
Class TrEditNum enhanced TEdit component which provides functionality for editing of integer or float number
Class TrCheckTreeView enhanced TTreeView component which provides checkboxes and child/parent node auto check functions
Class TrStringsHolder non visual component containing Strings object for editing in design time and storing in application
Class TrImageListEx enhanced ImageList component which provides storing of images in external compressed resource file in design and runtime and can block storing images in DFM file for descendant modules, so list can be used in ihnerited forms
Class TTabPropsEx subcomponent - define all props and events for TrTabControlEx and TrPageControlEx
Class TrPageControlEx enhanced PageControl which provides colored tabs, hottrack fonts, color and border, close button in tabs, function for reading active tab caption and changing of active tab; OwnerDraw must be set to TRUE to use this functions
Class TrTabControlEx enhanced TabControl which provides colored tabs, hottrack fonts, color and border, close button in tabs, function for reading active tab caption and changing of active tab; OwnerDraw must be set to TRUE to use this functions
Class TrCategoryPanelEx fix the bug with subcomponents saved into DFM
Class TrCategoryPanelGroupEx fix the bug with subcomponents saved into DFM

Functions and Procedures

procedure Register;

Types

TFrameType = (...);
TGradientType = (...);
TMinMaxBtnType = (...);
TBackgroundPictureType = (...);
TCaptionPosition = (...);
TDrawControl = procedure(WinControl: TWinControl; const Rect: TRect) of object;
TDropFilesEvent = procedure(Sender: TObject; X, Y: integer) of object;
TSetChildrenValueTypes = (...);
TShapeType = (...);
TLabelPos = (...);
TGetListItemProps = procedure(Sender: TObject; Canvas: TCanvas; Index: integer; State: TOwnerDrawState; var Rect: TRect; var Text: string; ShowBmp: TBitmap; var DrawSeparatorTop: boolean; var DrawSeparatorBottom: boolean) of object;
enStyle = (...);
TTabGetPropsEvent = procedure(Sender: TObject; TabIndex: integer; Font: TFont; var BkColor: TColor; var CanClose: boolean) of object;
TTabCloseEvent = procedure(Sender: TObject; TabIndex: integer; var CanClose: boolean) of object;
TTabGetPopupMenu = procedure(Sender: TObject; TabIndex: integer; var PopupMenu: TPopupMenu) of object;
TTabDrawTabEvent = procedure(Sender: TCustomTabControl; TabIndex: integer; PaneRect, TabRect: TRect; BkColor: TColor; Selected, Hot, CloseBtn: boolean) of object;

Constants

rGroupBoxDefFrame = ft3D;
rGroupBoxDefSeparator = ';';
rPageExSpace = 2;

Description

Functions and Procedures

procedure Register;
 

Types

TFrameType = (...);

frame types for TrGroupBox

Values
  • ft3D:  
  • ftSingleLine:  
  • ftDoubleLine:  
  • ftNone:  
TGradientType = (...);

gradient types for TrGroupBox

Values
  • gtNone:  
  • gtVertical:  
  • gtHorizontal:  
TMinMaxBtnType = (...);

min max button types for TrGroupBox

Values
  • mmbNone:  
  • mmbRound:  
  • mmbRect:  
  • mmbPicture:  
TBackgroundPictureType = (...);

background picture types for TrGroupBox

Values
  • bkpNone:  
  • bkpCenter:  
  • bkpStretch:  
  • bkpTile:  
TCaptionPosition = (...);
 
Values
  • cpTop:  
  • cpBottom:  
  • cpLeft:  
  • cpRight:  
TDrawControl = procedure(WinControl: TWinControl; const Rect: TRect) of object;
 
TDropFilesEvent = procedure(Sender: TObject; X, Y: integer) of object;

Event generated when files are dropped on the control - identify sending control and the X and Y co-oridnates where files were dropped

TSetChildrenValueTypes = (...);

TrGroupBox - provide new type of groupbox with following functions: - headline caption with definable colors; - 4 types of frames with definable colors; - min max buttons with automatical and animated functions; - gradient background or background image; - support dropping of files to box; - support automatic resizing of children components;

Values
  • chvSetVisibility:  
  • chvSetEnability:  
  • chvSetColor:  
  • chvSetDataSource:  
  • chvSetSpecEnability:  
TShapeType = (...);

types of shapes

Values
  • stRect:  
  • stRoundRect:  
  • stElipse:  
  • stHalfElipseLeft:  
  • stHalfElipseTop:  
  • stHalfElipseRight:  
  • stHalfElipseBottom:  
TLabelPos = (...);

types of boundlabel positions

Values
  • lpInside:  
  • lpTopLeft:  
  • lpTopCenter:  
  • lpTopRight:  
  • lpBottomLeft:  
  • lpBottomCenter:  
  • lpBottomRight:  
TGetListItemProps = procedure(Sender: TObject; Canvas: TCanvas; Index: integer; State: TOwnerDrawState; var Rect: TRect; var Text: string; ShowBmp: TBitmap; var DrawSeparatorTop: boolean; var DrawSeparatorBottom: boolean) of object;

============================================================================== TrComboBoxEx

enStyle = (...);
 
Values
  • enInteger:  
  • enFloat:  
TTabGetPropsEvent = procedure(Sender: TObject; TabIndex: integer; Font: TFont; var BkColor: TColor; var CanClose: boolean) of object;
 
TTabCloseEvent = procedure(Sender: TObject; TabIndex: integer; var CanClose: boolean) of object;
 
TTabGetPopupMenu = procedure(Sender: TObject; TabIndex: integer; var PopupMenu: TPopupMenu) of object;
 
TTabDrawTabEvent = procedure(Sender: TCustomTabControl; TabIndex: integer; PaneRect, TabRect: TRect; BkColor: TColor; Selected, Hot, CloseBtn: boolean) of object;
 

Constants

rGroupBoxDefFrame = ft3D;
 
rGroupBoxDefSeparator = ';';
 
rPageExSpace = 2;
 

Author

Created

Oct 2010

Last Modified

Jan 2016


Generated by PasDoc 0.13.0 on 2016-02-19 08:14:10