Class: LicenceBox

• Inheritance
• Description
• Related information
• Class protocol
  • Signal constants
  • initialization
  • instance creation
• Instance protocol
  • accessing
  • destroying
  • initialization
  • private
  • queries
• Demonstration
• Examples

Inheritance:

   Object
   |
   +--GraphicsContext
      |
      +--DeviceGraphicsContext
         |
         +--GraphicsMedium
            |
            +--DisplaySurface
               |
               +--SimpleView
                  |
                  +--View
                     |
                     +--TopView
                        |
                        +--StandardSystemView
                           |
                           +--ModalBox
                              |
                              +--DialogBox
                                 |
                                 +--LicenceBox

Package:

stx:libwidg2

Category:

Views-DialogBoxes

Version:

rev: 1.28 date: 2009/11/17 13:30:19

user: cg

file: LicenceBox.st directory: libwidg2

module: stx stc-classLibrary: libwidg2

Author:

Stefan Vogel

Description:

LicenceBox shows a licence text when opened, an returns true,
if the licence has been accepted, false otherwise.

Related information:

    AboutBox

Class protocol:

 licenceRejectSignal

licence has been rejected by user

 initialize

 open

open myself modal and return true if accepted, false otherwise

 openOnFile: aFileName

like open, but show the HTML-text found in aFileName.
Can be used for end-user applications which want to display
there own licence text.

Instance protocol:

 accepted

return accepted

 accepted: something

set accepted

 licenceText: someHTMLText

set the text which is shown in the box

 topDirectory: aDirectoryName

set the topDirectory, which is required for hyperlinks
to work (in the html text)

 terminate

this is the close from a windowmanager
(only if UseTransientViews == true).
Redefined, since ModalBox keeps the View alive (only hidden)

 initialize

 mapped

 licenceFile

get filename of licence file

 licenceText

get licence text

 topDirectory

get name of top directory

 windowStyle

Demonstration:

    LicenceBox open

Examples:

    LicenceRejectSignal handle:[:ex|
        Transcript showCR:'Licence rejected'.
    ] do:[
        LicenceBox open.
        Transcript showCR:'Licence accepted'.
    ]