Extended LIST properties

community Showcase
21 
  !- overwrite column behavior
  CLEAR(extProps)
  extProps.nColumn = 2        !- name column
  extProps.bWordWrap = TRUE
  SELF.SetExtListProps(extProps)
  CLEAR(extProps)
  extProps.nColumn = 3        !- address column
  extProps.bWordWrap = TRUE
  extProps.nMinFontSize = 6   !- min reduced font size
  SELF.SetExtListProps(extProps)
  CLEAR(extProps)
  extProps.nColumn = 4        !- post column
  extProps.bWordWrap = TRUE
  SELF.SetExtListProps(extProps)

For writing code that specifies List Column Numbers using Equates works better if the List changes to add, move or delete columns.

For APPs there are templates like this post of mine, and it links to Rick’s original, that make it easy. For Hand Code use ITEMIZE.

1 Like