AbstractHierarchicalItem.st
changeset 5802 6c9048db7e12
parent 5740 dfd1e2063b66
child 5821 bdc085ed6c8d
equal deleted inserted replaced
5801:7f0803f7e339 5802:6c9048db7e12
  1786 
  1786 
  1787     ^ self canExpand
  1787     ^ self canExpand
  1788 !
  1788 !
  1789 
  1789 
  1790 drawHorizontalLineUpToText
  1790 drawHorizontalLineUpToText
  1791     "draw the horizizontal line for the selected item up to the text
  1791     "draw the horizontal line for the selected item up to the text
  1792      or on default to the start of the the vertical line; only used by
  1792      or (by default) to the start of the vertical line; 
  1793      the hierarchical view
  1793      only used by the hierarchical view
  1794     "
  1794     "
  1795     ^ false
  1795     ^ false
       
  1796 
       
  1797     "Modified (comment): / 12-06-2018 / 10:41:54 / Claus Gittinger"
  1796 !
  1798 !
  1797 
  1799 
  1798 hasChildren
  1800 hasChildren
  1799     "checks whether the item has children; 
  1801     "checks whether the item has children; 
  1800      the list needs not to be loaded yet( example. FileDirectory ).
  1802      the list needs not to be loaded yet( example. FileDirectory ).