demo1.mws

>   

For debugging purposes it can be convenient to edit the Maplet definition within the Maple worksheet interface:

>    use Maplets, Maplets[Elements] in
  demo1 := Maplet(
            Window(
             'title' = "Enter an Equation",
             [   # col 1
              [  # row 1 (contains 2 columns)
               "Enter an equation",
               TextField['eqn'](width=20)
              ], # end row 1
              [  # row 2 (contains 1 column)
               Button("Return",Shutdown(['eqn']))
              ]  # end row 2
             ]   # end col 1
            )    # end Window
           ):    # end Maplet
end use:

>    Maplets[Display](demo1);

>   

Once this Maplet works as desired, and all extraneous commands have been removed, the Maple worksheet can be prepared for access via the MapletViewer  by saving the worksheet as a .maplet  file (see ?MapletViewer  for additional details). Double-clicking on a .maplet file should invoke MapletViewer  to display the Maplet. (For optimal performance, the last command in the worksheet should be a Maplets[Display]  command.) Try it!

>