Toutlineviewer

type Toutlineviewer = object(TScroller)

  foc: sw_integer;

  constructor init();

  procedure adjust(); virtual;

  function creategraph();

  procedure draw; virtual;

  procedure expandall();

  function firstthat();

  procedure focused(); virtual;

  procedure foreach();

  function getchild(); virtual;

  function getgraph();

  function getnode(); virtual;

  function getnumchildren(); virtual;

  function getpalette; virtual;

  function getroot; virtual;

  function gettext(); virtual;

  procedure handleevent(); virtual;

  function haschildren(); virtual;

  function isexpanded(); virtual;

  function isselected(); virtual;

  procedure selected(); virtual;

  procedure setstate(); virtual;

  procedure update;

end;

Toutlineviewer

TScroller

TView

TObject