examples/CodingExamples_GUI__JavaAppletDemo1.st
author Claus Gittinger <cg@exept.de>
Thu, 24 Nov 2011 12:54:24 +0100
changeset 2290 cd61fd0b66ac
parent 749 e898eaeff091
child 2396 fadc6d7a2f5b
permissions -rw-r--r--
fixed: #version_SVN ($ to ยง)
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     1
"{ NameSpace: CodingExamples_GUI }"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     2
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     3
ApplicationModel subclass:#JavaAppletDemo1
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     4
	instanceVariableNames:''
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     5
	classVariableNames:''
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     6
	poolDictionaries:''
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     7
	category:'examples-Java-Applets'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     8
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     9
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    10
!JavaAppletDemo1 class methodsFor:'documentation'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    11
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    12
documentation
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    13
"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    14
    Simple app using a java applet
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    15
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    16
    [author:]
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    17
        Claus Gittinger (cg@betti)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    18
"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    19
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    20
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    21
examples
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    22
"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    23
    examples to be added.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    24
                                                                [exBegin]
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    25
    JavaAppletDemo1 open 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    26
                                                                [exEnd]
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    27
"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    28
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    29
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    30
!JavaAppletDemo1 class methodsFor:'interface specs'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    31
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    32
windowSpec
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    33
    "this window spec was automatically generated by the ST/X UIPainter"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    34
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    35
    "do not manually edit this - the painter/builder may not be able to
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    36
     handle the specification if its corrupted."
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    37
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    38
    "
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    39
     UIPainter new openOnClass:CodingExamples_GUI::JavaAppletDemo1 andSelector:#windowSpec
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    40
     CodingExamples_GUI::JavaAppletDemo1 new openInterface:#windowSpec
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    41
    "
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    42
    "CodingExamples_GUI::JavaAppletDemo1 open"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    43
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    44
    <resource: #canvas>
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    45
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    46
    ^
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    47
     
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    48
       #(#FullSpec
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    49
          #'window:' 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    50
           #(#WindowSpec
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    51
              #'name:' 'standardSystemView'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    52
              #'layout:' #(#LayoutFrame 216 0 173 0 572 0 657 0)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    53
              #'label:' 'unnamed canvas'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    54
              #'min:' #(#Point 10 10)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    55
              #'max:' #(#Point 1280 1024)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    56
              #'bounds:' #(#Rectangle 216 173 573 658)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    57
              #'usePreferredExtent:' false
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    58
          )
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    59
          #'component:' 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    60
           #(#SpecCollection
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    61
              #'collection:' 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    62
               #(
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    63
                 #(#LabelSpec
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    64
                    #'name:' 'label1'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    65
                    #'layout:' #(#LayoutFrame 0 0.0 7 0 0 1.0 48 0)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    66
                    #'label:' 'Java applet example'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    67
                    #'style:' #(#FontDescription #times #bold #roman 18)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    68
                )
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    69
                 #(#ActionButtonSpec
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    70
                    #'name:' 'actionButton1'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    71
                    #'layout:' #(#AlignmentOrigin 179 0 -14 1 0.5 1)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    72
                    #'label:' 'dismiss'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    73
                    #'model:' #closeRequest
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    74
                )
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    75
                 #(#ViewSpec
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    76
                    #'name:' 'view1'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    77
                    #'layout:' #(#LayoutFrame 4 0.0 60 0.0 -4 1.0 -60 1.0)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    78
                    #'component:' 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    79
                     #(#SpecCollection
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    80
                        #'collection:' 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    81
                         #(
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    82
                           #(#JavaAppletComponentSpec
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    83
                              #'name:' 'javaAppletComponent2'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    84
                              #'layout:' #(#LayoutFrame 1 0.0 1 0.0 -1 1.0 -1 1.0)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    85
                              #'codeURL:' 'ArcTest.class'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    86
                              #'codeBaseURL:' 'file:examples/ArcTest'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    87
                              #'level:' -1
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    88
                          )
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    89
                        )
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    90
                    )
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    91
                    #'level:' -1
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    92
                )
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    93
              )
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    94
          )
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    95
      )
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    96
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    97
    "Modified: / 30.1.1998 / 05:03:29 / cg"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    98
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    99
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   100
!JavaAppletDemo1 class methodsFor:'documentation'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   101
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   102
version
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   103
    ^ '$Id$'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   104
! !