eXept Software AG Logo

Smalltalk/X Webserver

Smalltalk Dynamic Web Pages - Source of WebDemoApp1-test_svg2:

Home

Documentation
www.exept.de
Everywhere
for:
test_svg2:aRequest
    "a reply, generating html using an HTMLBuilder

     Invoke via the browser as URL:
        host:port/<N>,svg1:
     where <N> is the registered name of this service.
    "

    |builder|

    builder := HTML::TreeBuilder newDocument.
    builder title:'hhh'.
    builder body.
    builder h1:'SVG Example'.
    builder div:[
        builder text:'hello world'
    ].
    builder iframe src:(aRequest linkIdFor:self selector:#'theSVG2:').
    builder iframeEnd.
    builder bodyEnd.

    aRequest response
        nextPutAll:(builder htmlString)

Edit
Index


ST/X 7.2.0.0; WebServer 1.670 at bd0aa1f87cdd.unknown:8081; Mon, 18 Nov 2019 00:44:35 GMT