tnMenu

type tnMenu = object

public

  constructor Init();

  destructor Done;

  procedure Post;

  procedure UnPost;

  procedure Start;

  procedure Stop;

  procedure Show;

  procedure Hide;

  function Wind;

  procedure Move();

  procedure Align();

  procedure PutHeader();

  procedure Clear;

  function Add();

  procedure Insert();

  procedure Remove();

  procedure Change();

  procedure Active();

  function IsActive();

  procedure Spin();

  function Status;

  function Index;

  procedure SetIndex();

  function Count;

  function Rows();

  function Cols();

  function IsAssigned();

  function GetMark;

  procedure SetMark();

  procedure Refresh;

  procedure SetColor();

  procedure SetCursorColor();

  procedure SetFrameColor();

  procedure SetGrayColor();

end;

tnMenu

TObject