From 9680b47879dfc58f884208f7abf2f945b3b41d25 Mon Sep 17 00:00:00 2001 From: "N.N." Date: Wed, 24 Sep 2003 10:46:19 +0000 Subject: adding toxy project svn path=/trunk/externals/miXed/; revision=1024 --- test/toxy/listbox-test.pd | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100644 test/toxy/listbox-test.pd (limited to 'test/toxy/listbox-test.pd') diff --git a/test/toxy/listbox-test.pd b/test/toxy/listbox-test.pd new file mode 100644 index 0000000..cd1fa46 --- /dev/null +++ b/test/toxy/listbox-test.pd @@ -0,0 +1,18 @@ +#N canvas 154 52 626 383 12; +#X obj 281 144 widget listbox lb -width 32 -height 12 -bg black -fg +white; +#X obj 20 282 tow . listbox lb; +#X obj 20 21 loadbang; +#X msg 20 52 ini foreach fn [lsort [glob *]] .(.- insert end $fn.) +; +#X obj 236 143 widget button b -text ok -height 14 -bg black -fg white +-command .<.>; +#X obj 112 21 tow . button b; +#X msg 36 83 tot if .([.- curselection] != "".) .(eval ..); +#X msg 20 324; +#X connect 1 0 7 0; +#X connect 2 0 3 0; +#X connect 3 0 1 0; +#X connect 5 0 6 0; +#X connect 6 0 1 0; -- cgit v1.2.1