'
'Class description:
'
!short:Loc class structure:
Class Loc:
~~~~~~~~~~~
Cursor screen position is here defined.

Common Use:
~~~~~~~~~~~
LOCAL OBJECT Loc OF Loc
Loc:Get()
...
Loc:Set()

Source code is in C_Loc.prg

!seealso: c_cursor.ngo:Cursor c_box.ngo:Box c_frame.ngo:Frame c_color.ngo:Color ob_class.ngo:"Class Hierarchy"

!short:~~~~~~~~~~~~~~~~~~~~~
!short:create class Loc
!short:  export:
!short:  var Row     //3
^BLoc:Row^N: public: numeric
  Screen cursor position.

!short:  var Col     //4
^BLoc:Col^N: public: numeric
  Screen row position.

!short:  method New=LocNew   //o:New() --> self
^BLoc:New()^N: public: return self
  Object is filled with default values.

!short:  method Init=LocInit //o:Init(Row,Col) --> true
^BLoc:Init(Row,Col)^N: public: return true
  Row and Col screen positions are saved to instvar variables of the object.

!short:  method Get=LocGet   //o:Get() --> true
^BLoc:Get()^N: public: return true
  Cursor coordinates are read into instvar variables of the object.

!short:  method Set=LocSet   //o:Set() --> true
^BLoc:Set()^N: public: return true
  Cursor is set to Loc:Row,Loc:Col positions.

!short:  endclass

