CVSROOT: /sources/gnash
Module name: gnash
Changes by: Zou Lunkai <zoulunkai> 07/09/19 08:02:15
Modified files:
. : ChangeLog
testsuite/misc-swfc.all: Makefile.am
Added files:
testsuite/misc-swfc.all: edittext_test1.sc
Log message:
* testsuite/misc-swfc.all/edittext_test1.sc, Makefile.am: new testcase
for
TextField using swfc. Clearer then Ming based tests. TextField
variable
still need some work.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/ChangeLog?cvsroot=gnash&r1=1.4346&r2=1.4347
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/misc-swfc.all/Makefile.am?cvsroot=gnash&r1=1.11&r2=1.12
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/misc-swfc.all/edittext_test1.sc?cvsroot=gnash&rev=1.1
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/gnash/gnash/ChangeLog,v
retrieving revision 1.4346
retrieving revision 1.4347
diff -u -b -r1.4346 -r1.4347
--- ChangeLog 19 Sep 2007 06:38:04 -0000 1.4346
+++ ChangeLog 19 Sep 2007 08:02:15 -0000 1.4347
@@ -1,3 +1,9 @@
+2007-09-19 Zou Lunkai <[EMAIL PROTECTED]>
+
+ * testsuite/misc-swfc.all/edittext_test1.sc, Makefile.am: new testcase
for
+ TextField using swfc. Clearer then Ming based tests. TextField
variable
+ still need some work.
+
2007-09-19 Sandro Santilli <[EMAIL PROTECTED]>
* gui/kde_glue_agg.cpp: fix initialization order warning.
Index: testsuite/misc-swfc.all/Makefile.am
===================================================================
RCS file: /sources/gnash/gnash/testsuite/misc-swfc.all/Makefile.am,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -b -r1.11 -r1.12
--- testsuite/misc-swfc.all/Makefile.am 18 Sep 2007 10:30:40 -0000 1.11
+++ testsuite/misc-swfc.all/Makefile.am 19 Sep 2007 08:02:15 -0000 1.12
@@ -29,6 +29,7 @@
movieclip_destruction_test4.sc \
action_execution_order_test10.sc \
action_execution_order_test12.sc \
+ edittext_test1.sc \
$(NULL)
# These will get compiled to SWFs just as above, but will not be executed as a
test
Index: testsuite/misc-swfc.all/edittext_test1.sc
===================================================================
RCS file: testsuite/misc-swfc.all/edittext_test1.sc
diff -N testsuite/misc-swfc.all/edittext_test1.sc
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ testsuite/misc-swfc.all/edittext_test1.sc 19 Sep 2007 08:02:15 -0000
1.1
@@ -0,0 +1,115 @@
+/*
+ * Copyright (C) 2005, 2006, 2007 Free Software Foundation, Inc.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+ *
+ */
+
+/*
+ * Zou Lunkai, [EMAIL PROTECTED]
+ */
+
+
+.flash bbox=800x600 filename="edittext_test1.swf" background=white version=7
fps=1
+
+.frame 1
+ .action:
+ #include "Dejagnu.sc"
+ .end
+
+ .edittext edtext1 size=200%
+ width=400 height=200
+ color=blue border multiline wordwrap
+ text="Hello"
+ variable="textVar1"
+
+ .put edtext1 x=10 y=300
+
+ .action:
+ // check the initial values
+ check_equals(typeof(edtext1), 'object');
+ xcheck_equals(edtext1._name, 'edtext1');
+ xcheck_equals(edtext1._target, '/edtext1');
+ check_equals(edtext1.text, 'Hello');
+ check_equals(edtext1.variable, 'textVar1');
+ check_equals(_root.textVar1, 'Hello');
+ .end
+
+
+.frame 2
+ .action:
+ // Update the registered variable
+ _root.textVar1 = 'new-string-frame2';
+ check_equals(_root.textVar1, 'new-string-frame2');
+ // The return value of TextField.text also updated
+ check_equals(edtext1.text, 'new-string-frame2');
+ .end
+
+.frame 3
+ .action:
+ // Update TextField.text
+ edtext1.text = 'new-string-frame3';
+ check_equals(edtext1.text, 'new-string-frame3');
+ // The return value of the registered variable also updated
+ check_equals(edtext1.text, 'new-string-frame3');
+ .end
+
+.frame 4
+ .action:
+ // rename the EditText variable to 'textVar2'
+ edtext1.variable = 'textVar2';
+ check_equals(edtext1.variable, 'textVar2');
+ // textVar2 automatically initialized to 'Hello'
+ // (the InitialText in DefineTextField tag, make sense!)
+ xcheck_equals(_root.textVar2, 'Hello');
+ xcheck_equals(edtext1.text, 'Hello');
+ xcheck_equals(_root.textVar1, 'new-string-frame3');
+ .end
+
+
+.frame 5
+ .action:
+ // restore the EditText variable name to 'textVar1'
+ edtext1.variable = 'textVar1';
+ check_equals(edtext1.variable, 'textVar1');
+ // edtext1.text also restore to the value of
+ // _root.textVar1(the registered variable)
+ xcheck_equals(edtext1.text, 'new-string-frame3');
+ .end
+
+
+.frame 6
+ .action:
+ edtext1.text = 'new-string-frame6';
+ check_equals(edtext1.text, 'new-string-frame6');
+ xcheck_equals(_root.textVar1, 'new-string-frame6');
+
+ // Rename the EditText variable to 'textVar3'
+ edtext1.variable = 'textVar3';
+ // textVar3 automatically initialized to 'Hello'
+ // (the InitialText in DefineTextField tag, make sense!)
+ xcheck_equals(_root.textVar3, 'Hello');
+ xcheck_equals(_root.textVar1, 'new-string-frame6');
+ .end
+
+
+.frame 10
+ .action:
+ totals();
+ stop();
+ .end
+
+
+.end // file end
+
_______________________________________________
Gnash-commit mailing list
Gnash-commit@gnu.org
http://lists.gnu.org/mailman/listinfo/gnash-commit
