Unit MRUFList

Standard defines for all Delphi Free Stuff components } {------------------------------------------------------------------------------} { TMRUFileList v2.21 } {------------------------------------------------------------------------------} { A Most Recently Used (MRU) File List component for Delphi. } { Copyright 1998, Brad Stowers. All Rights Reserved. } { This component can be freely used and distributed in commercial and } { private environments, provied this notice is not modified in any way. } {------------------------------------------------------------------------------} { Feel free to contact me if you have any questions, comments or suggestions } { at bstowers@pobox.com. } { The latest version of this component can always be found at: } { http://www.pobox.com/~bstowers/delphi/ } { See MRUFList.txt for notes, known issues, and revision history. } {------------------------------------------------------------------------------} { Date last modified: June 3, 1998 } {------------------------------------------------------------------------------} { C++Builder 3 requires this if you use run-time packages.

Classes

TMRUFileList -
TMRUMenuItem - A simple TMenuItem descendant to be used for RTTI

Functions

Register - Maximum width of an MRU item, 0 = no maximum.

Types

TMRUClick
TRootKey

Constants

DEF_ADDTOTOP
DEF_MAXCAPTIONWIDTH
DEF_MAXIMUM
DEF_REMOVEONCLICK
DEF_SUBMENUNAME
DEF_USEREGISTRY
DEF_USESUBMENU
DFS_COMPONENT_VERSION

Variables


Functions


procedure Register;

Maximum width of an MRU item, 0 = no maximum.

empty write method, just needed to get it to show up in Object Inspector


Types


TMRUClick = procedure(Sender: TObject; AFilename: string) of Object
Event procedure for MRU item click. Passes filename for easy us
TRootKey = (rkClassesRoot, rkCurrentUser, rkLocalMachine, rkUsers,
     rkCurrentConfig, rkDynData);
Registry root values

Constants

DEF_ADDTOTOP = TRUE

Defaults for component properties

DEF_MAXCAPTIONWIDTH = 200

DEF_MAXIMUM = 5

DEF_REMOVEONCLICK = TRUE

DEF_SUBMENUNAME = 'Reopen'

DEF_USEREGISTRY = FALSE

DEF_USESUBMENU = FALSE

DFS_COMPONENT_VERSION = 'TMRUFileList v2.21'


Variables