Object - ComponentPatternName Property

ComponentPatternName is used to qualify the class of the component.

Member of Object (PRIM_OBJT)

Data Type - String

Details

ComponentPatternName is the name of the component's class or the class of which it is a member.
 
For classes defined in LANSA as a member of another class, otherwise known as a Pattern e.g. PRIM_VS.Style, the ComponentPatternName is "PRIM_VS".
 
Unless the application requires complex generic programming, ComponentPatternName is unlikely to be required for most development purposes.

Example

This simple form demonstrates the difference between ComponentPatternName, ComponentClassName and ComponentTypeName
Function Options(*DIRECT)
Begin_Com Role(*EXTENDS #PRIM_FORM) Clientwidth(861) Clientheight(404) Componentversion(2) Top(227) Left(222)
 
   Define_Com Class(#PRIM_VS.Style) Name(#Style1) Backgroundbrush(#Brush1)
   Define_Com Class(#PRIM_VS.SolidBrush) Name(#Brush1) Color(154:212:255)
 
   Define_Com Class(#PRIM_LABL) Name(#Label1) Caption('Label1') Displayposition(1) Ellipses(Word) Height(25) Left(272) Parent(#COM_OWNER) Tabposition(1) Tabstop(False) Top(19) Verticalalignment(Center) Width(265) Style(#Style1) Marginleft(4)
   Define_Com Class(#PRIM_LABL) Name(#Label2) Caption('Label2') Displayposition(2) Ellipses(Word) Height(25) Left(272) Parent(#COM_OWNER) Tabposition(2) Tabstop(False) Top(54) Verticalalignment(Center) Width(265) Style(#Style1) Marginleft(4)
   Define_Com Class(#PRIM_LABL) Name(#Label3) Caption('Label3') Displayposition(3) Ellipses(Word) Height(25) Left(272) Parent(#COM_OWNER) Tabposition(3) Tabstop(False) Top(88) Verticalalignment(Center) Width(265) Style(#Style1) Marginleft(4)
 
   Evtroutine Handling(#COm_owner.CreateInstance)
 
      #Label1 := "ClassName" + " - " + #Style1.ComponentClassName
      #Label2 := "PatternName" + " - " + #Style1.ComponentPatternName
      #Label3 := "TypeName" + " - " + #Style1.ComponentTypeName
 
   Endroutine
 
End_Com

See also

All Component Classes

Technical Reference

Febuary 18 V14SP2