amy/venice-main-classic
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge of the NewUI changes into the trunk

Browse Source
This commit is contained in:
Eric J. Bowersox
2002-01-07 02:05:37 +00:00
parent b86ef1c3b0
commit c3e2870572
516 changed files with 32853 additions and 26097 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
scripts/test/test1.jacl Normal file
View File

@@ -0,0 +1,14 @@
# Script for testing the new UI framework
package require java
set request [bsf lookupBean "request"]
if {[$request hasParameter "p"]} {
$logger debug "Got the parameter value!"
set tmp [$request getParameter "p"]
set part1 "Requested parameter: $tmp<P>"
} else {
set part1 ""
} ;# end if
$vlib output "$part1 <B>In the house!</B>"

10
scripts/test/test2.jacl Normal file
View File

@@ -0,0 +1,10 @@
# Script for testing the View mechanism
package require java
java::import com.silverwrist.venice.ui.LinkTypes
set rc [java::new com.silverwrist.venice.ui.view.TextMessage "Test Display" "subtitle"]
set blort "If this had been an actual emergency we would all be dead by now."
java::prop $rc text "This is a test.<BR>This is only a test.<BR>$blort"
$rc addButton [java::field LinkTypes ABSOLUTE] "TODO" "ok"
$rc addButton [java::field LinkTypes ABSOLUTE] "TODO" "cancel"
$vlib output $rc

12
scripts/test/test2.js Normal file
View File

@@ -0,0 +1,12 @@
// Script for testing the View mechanism
// Translation of test2.jacl
importPackage(Packages.com.silverwrist.venice.ui);
importClass(Packages.com.silverwrist.venice.ui.view.TextMessage);
rc = new TextMessage("Test Display","JavaScript subtitle");
blort = "If this had been an actual emergency we would all be dead by now."
rc.text = "This is a test.<BR>This is only a test.<BR>" + blort;
rc.addButton(LinkTypes.ABSOLUTE,"TODO","ok");
rc.addButton(LinkTypes.ABSOLUTE,"TODO","cancel");
vlib.output(rc);

17
scripts/test/test3.jacl Normal file
View File

@@ -0,0 +1,17 @@
# Script for testing the sidebox framework
# Translated from test3.js
package require java
java::import com.silverwrist.venice.ui.LinkTypes
java::import com.silverwrist.venice.ui.view.SideBoxNestedView
java::import com.silverwrist.venice.ui.view.TextMessage
set rinput [bsf lookupBean "request"]
set rc [java::new TextMessage "Test Display" "Jacl subtitle"]
set blort "If this had been an actual emergency we would all be dead by now."
java::prop $rc text "This is a test.<BR>This is only a test.<BR>$blort"
$rc addButton [java::field LinkTypes ABSOLUTE] "TODO" "ok"
$rc addButton [java::field LinkTypes ABSOLUTE] "TODO" "cancel"
set rc2 [java::new SideBoxNestedView $rinput $rc]
$vlib output $rc2

13
scripts/test/test3.js Normal file
View File

@@ -0,0 +1,13 @@
// Script for testing the sidebox framework
importPackage(Packages.com.silverwrist.venice.ui);
importPackage(Packages.com.silverwrist.venice.ui.view);
rinput = bsf.lookupBean("request");
rc = new TextMessage("Test Display","JavaScript subtitle");
blort = "If this had been an actual emergency we would all be dead by now."
rc.text = "This is a test.<BR>This is only a test.<BR>" + blort;
rc.addButton(LinkTypes.ABSOLUTE,"TODO","ok");
rc.addButton(LinkTypes.ABSOLUTE,"TODO","cancel");
rc2 = new SideBoxNestedView(rinput,rc);
vlib.output(rc2);