Update of /cvsroot/htoolkit/gio/src/Graphics/UI/GIO
In directory sc8-pr-cvs1:/tmp/cvs-serv8978/src/Graphics/UI/GIO
Modified Files:
Controls.hs
Log Message:
Comments
Index: Controls.hs
===================================================================
RCS file: /cvsroot/htoolkit/gio/src/Graphics/UI/GIO/Controls.hs,v
retrieving revision 1.23
retrieving revision 1.24
diff -C2 -d -r1.23 -r1.24
*** Controls.hs 24 Aug 2003 13:57:34 -0000 1.23
--- Controls.hs 24 Aug 2003 14:21:01 -0000 1.24
***************
*** 66,72 ****
--- 66,84 ----
-- ** CheckBox
+ -- | A check box consists of a square box and a label, that indicates a choice
+ -- the user can make by selecting the check. Each CheckBox has two states:
+ -- checked (a check mark inside the box) or cleared (no check mark). The
+ -- state is controled from the 'checked' attribute. Repeatedly clicking a
+ -- check box toggles it from checked to cleared and back again.
, CheckBox, checkBox
-- ** RadioBox
+ -- | A radio button consists of a round button and a label that indicates a
+ -- choice the user can make by selecting the button. An application typically
+ -- uses radio buttons in a group box to permit the user to choose from a set
+ -- of mutually exclusive options. The group is defined with 'setRadioBoxGroup'
+ -- function. When the user selects an radio button from group then the system
+ -- automatically sets its check state to 'checked' and clears all other
+ -- buttons within the same group.
, RadioBox, radioBox, setRadioBoxGroup
***************
*** 77,81 ****
-- | A notebook control is analogous to the dividers in a real notebook.
-- By using a notebook control, an application can define multiple pages for
! -- the same area of a window or dialog box.
, Notebook, notebook, labelsPosition, selectedPage
, NotebookPage, notebookPageAt, notebookPage
--- 89,95 ----
-- | A notebook control is analogous to the dividers in a real notebook.
-- By using a notebook control, an application can define multiple pages for
! -- the same area of a window or dialog box. Each page is represented from
! -- 'NotebookPage' type and is created from 'notebookPageAt' or 'notebookPage'
! -- function.
, Notebook, notebook, labelsPosition, selectedPage
, NotebookPage, notebookPageAt, notebookPage
***************
*** 708,712 ****
instance SingleSelect Notebook where
selected = newStdAttr nbhandle Port.getNotebookSelection Port.setNotebookSelection
!
selectedPage :: Attr Notebook NotebookPage
selectedPage = newAttr getPage setPage
--- 722,727 ----
instance SingleSelect Notebook where
selected = newStdAttr nbhandle Port.getNotebookSelection Port.setNotebookSelection
!
! -- | The selected page in the notebook
selectedPage :: Attr Notebook NotebookPage
selectedPage = newAttr getPage setPage
***************
*** 721,725 ****
Port.setNotebookSelection (nbhandle w)index
! -- | A notebook page control.
data NotebookPage = NotebookPage
{ pghandle :: !WindowHandle
--- 736,740 ----
Port.setNotebookSelection (nbhandle w)index
! -- | A notebook page.
data NotebookPage = NotebookPage
{ pghandle :: !WindowHandle
***************
*** 739,742 ****
--- 754,758 ----
return pg
+ -- | Appends a new page in the notebook.
notebookPage :: [Prop NotebookPage] -> Notebook -> IO NotebookPage
notebookPage = notebookPageAt Nothing
|
