testsuite/misc-mtasc.all/TextFieldTest.as

   1 // TextFieldTest.as - Tests for text
   2 //
   3 //   Copyright (C) 2007, 2009, 2010 Free Software Foundation, Inc.
   4 //
   5 // This program is free software; you can redistribute it and/or modify
   6 // it under the terms of the GNU General Public License as published by
   7 // the Free Software Foundation; either version 3 of the License, or
   8 // (at your option) any later version.
   9 //
  10 // This program is distributed in the hope that it will be useful,
  11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 // GNU General Public License for more details.
  14 //
  15 // You should have received a copy of the GNU General Public License
  16 // along with this program; if not, write to the Free Software
  17 // Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  18 //
  19 //
  20 // Original author: Asger Ottar Alstrup - asger@ottaralstrup.dk
  21 //
  22
  23 #include "check.as"
  24
  25 class Text
  26 {
  27         static function main(mc)
  28         {
  29                 mc.createTextField("textf", 100, 200, 100, 100, 100);
  30                 _level0.createTextField("textout", 99, 10, 10, 500, 500);
  31                 var tf = _level0.textf;
  32                 check_equals(tf._height, 100);
  33                 tf.autoSize = true;
  34                 tf.text = "Hello world";
  35                 tf.backgroundColor = "0xFFEEEE";
  36                 tf.background = true;
  37                 var height = tf._height;
  38                 note("textfield height is "+height);
  39                 check(height < 50);
  40                 check_totals(2);
  41                 Dejagnu.done();
  42         }
  43 }
  44