TEProperty -
E_EnumProperties - ******************************************************************
E_EnumProperties
Enumerate the properties of a component and return them
in stringlist Proplist where the string is the property name
and a TEProperty class associated with the property describes
how to manipulate the property.
E_GetBoolProp -
E_GetEnumList - ******************************************************************
E_GetEnumList
Get a string list representing the values of a set type or
an enumerated type property.
E_GetIntProp -
E_GetRealProp -
E_GetSetStrProp -
E_GetStrProp - ******************************************************************
E_Get????????
The next several routines get the value of PropName from component.
E_IsPublishedProp - ******************************************************************
E_IsPublished
Return true if PropName is a published property.
E_SetBoolProp -
E_SetIntProp -
E_SetRealProp -
E_SetSetStrProp -
E_SetStrProp - ******************************************************************
E_Set????????
The next several routines sets the value of PropName in component
to PropVal.
PROP_BMPSUB
PROP_BOOLTYPE
PROP_CHARTYPE
PROP_CLASSTYPE
PROP_COLORTYPE
PROP_CURSORTYPE
PROP_DATASETSUB
PROP_DATASOURCESUB
PROP_DBIDXNAMETYPE
PROP_DBLOOKUPFIELD
PROP_DBNAMETYPE
PROP_DBTABNAMETYPE
PROP_ENUMTYPE
PROP_FONTSUB
PROP_ICONSUB
PROP_INTTYPE
PROP_MODALTYPE
PROP_NOTYPE
PROP_REALTYPE
PROP_SETTYPE
PROP_STRTYPE
PROP_TSTRSUB
Function E_EnumProperties( AComponent : TComponent;
Var PropList : TStringList) : Integer;
******************************************************************
E_EnumProperties
Enumerate the properties of a component and return them
in stringlist Proplist where the string is the property name
and a TEProperty class associated with the property describes
how to manipulate the property. NOTE that it is expected that
PropList has not been created.
Function E_GetBoolProp( AComponent : TComponent;
Const PropName : String;
Var PropValue : Boolean) : Boolean;
Function E_GetEnumList( CompProp : TEProperty;
AList : TStrings) : Boolean;
******************************************************************
E_GetEnumList
Get a string list representing the values of a set type or
an enumerated type property. NOTE that it is expected AList has
already been created.
Function E_GetIntProp( AComponent : TComponent;
Const PropName : String;
Var PropValue : Integer) : Boolean;
Function E_GetRealProp( AComponent : TComponent;
Const PropName : String;
Var PropValue : Double) : Boolean;
Function E_GetSetStrProp( AComponent : TComponent;
Const PropName : String;
Var PropValue : String) : Boolean;
Function E_GetStrProp( AComponent : TComponent;
Const PropName : String;
Var PropValue : String) : Boolean;
******************************************************************
E_Get????????
The next several routines get the value of PropName from component.
Returns False if property doesn't exist.
Function E_IsPublishedProp( AComponent : TComponent;
Const PropName : String) : Boolean;
******************************************************************
E_IsPublished
Return true if PropName is a published property.
Function E_SetBoolProp( AComponent : TComponent;
Const PropName : String;
PropValue : Boolean) : Boolean;
Function E_SetIntProp( AComponent : TComponent;
Const PropName : String;
PropValue : Integer) : Boolean;
Function E_SetRealProp( AComponent : TComponent;
Const PropName : String;
PropValue : Double) : Boolean;
Function E_SetSetStrProp( AComponent : TComponent;
Const PropName : String;
PropValue : String) : Boolean;
Function E_SetStrProp( AComponent : TComponent;
Const PropName : String;
Const PropValue : String) : Boolean;
******************************************************************
E_Set????????
The next several routines sets the value of PropName in component
to PropVal. Returns False if property doesn't exist.
PROP_BMPSUB = 3
PROP_BOOLTYPE = 4
PROP_CHARTYPE = 5
PROP_CLASSTYPE = 10
PROP_COLORTYPE = 7
PROP_CURSORTYPE = 8
PROP_DATASETSUB = 5
PROP_DATASOURCESUB = 6
PROP_DBIDXNAMETYPE = 13
PROP_DBLOOKUPFIELD = 15
PROP_DBNAMETYPE = 12
PROP_DBTABNAMETYPE = 14
PROP_ENUMTYPE = 6
PROP_FONTSUB = 1
PROP_ICONSUB = 2
PROP_INTTYPE = 2
PROP_MODALTYPE = 11
PROP_NOTYPE = 0
******************************************************************
E_Props
Get and set RTTI information routines.
NOTE : I have encapsulated all RTTI manipulation routines in this
unit due to the possibility that Borland may change the structure
of RTTI with later releases. This way any changes required in an
application can be made in only one place. The TEProperty class
below provides an interface that can be used for displaying and
editing a component's properties.
Author : David Spies
Contacts : Work - davidsp@eastsoft.com Home DSPIES@onecom.com
PROP_REALTYPE = 3
PROP_SETTYPE = 9
PROP_STRTYPE = 1
PROP_TSTRSUB = 4