scilab/modules/gui/tests/nonreg_tests/bug_13962.tst

   1 // =============================================================================
   2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
   3 // Copyright (C) 2017 - Scilab Enterprises - Adeline CARNIS
   4 //
   5 //  This file is distributed under the same license as the Scilab package.
   6 // =============================================================================
   7
   8 // <-- TEST WITH GRAPHIC -->
   9
  10 // <-- INTERACTIVE TEST -->
  11
  12 // <-- Non-regression test for bug 13962 -->
  13 //
  14 // <-- Bugzilla URL -->
  15 // http://bugzilla.scilab.org/13962
  16 //
  17 // <-- Short Description -->
  18 // If the groupname and value properties were set to radiobutton creation,
  19 // then it was only selected at the first execution.
  20
  21 function test()
  22 f = createWindow();
  23 f.figure_name = "test";
  24 f.axes_size = [200 200];
  25 f.tag = "test";
  26 f.background = -2;
  27
  28 r1 = uicontrol(f, "style", "radiobutton", ...
  29 "string", "radiobutton1", ...
  30 "groupname", "testgroup", ...
  31 "value", 1, ...
  32 "tag", "r1", ...
  33 "position", [0 90 200 20]);
  34 endfunction
  35
  36 test();
  37 // check that the radiobutton is well selected.
  38 close();
  39
  40 test();
  41 // check that the radiobutton is well selected.
  42 close();