summaryrefslogtreecommitdiffstats
path: root/Mac/Lib/test/tctl.py
diff options
context:
space:
mode:
Diffstat (limited to 'Mac/Lib/test/tctl.py')
-rw-r--r--Mac/Lib/test/tctl.py17
1 files changed, 17 insertions, 0 deletions
diff --git a/Mac/Lib/test/tctl.py b/Mac/Lib/test/tctl.py
new file mode 100644
index 0000000..862eeb5
--- /dev/null
+++ b/Mac/Lib/test/tctl.py
@@ -0,0 +1,17 @@
+# play with controls
+
+from Dlg import *
+from Ctl import *
+from Win import *
+from Evt import *
+import time
+
+def main():
+ r = (40, 40, 400, 300)
+ w = NewWindow(r, "The Spanish Inquisition", 1, 0, -1, 1, 0x55555555)
+ w.DrawGrowIcon()
+ r = (40, 40, 100, 60)
+ c = NewControl(w, r, "SPAM!", 1, 0, 0, 1, 0, 0)
+
+
+main()