Obsolete, superseded by :Mac:Demo:imgbrowse and friends.

diff --git a/Mac/Lib/test/tscrollwin.py b/Mac/Lib/test/tscrollwin.py
deleted file mode 100644 (file)
index 661ad2b..0000000
--- a/Mac/Lib/test/tscrollwin.py
+++ /dev/null
@@ -1,86 +0,0 @@
-# Test FrameWork scrollbars
-# Draw a window in which the user can type.
-#
-# This test expects Win, Evt and FrameWork (and anything used by those)
-# to work.
-#
-# Actually, it is more a test of FrameWork by now....
-
-from FrameWork import *
-import Win
-import Qd
-import TE
-import os
-
-class MyWindow(ScrolledWindow):
-       def open(self, name):
-               r = (40, 40, 400, 300)
-               w = Win.NewWindow(r, name, 1, 0, -1, 1, 0x55555555)
-               self.ourrect = 0, 0, 360-SCROLLBARWIDTH-1, 260-SCROLLBARWIDTH-1
-               Qd.SetPort(w)
-               w.DrawGrowIcon()
-               self.wid = w
-               self.do_postopen()
-               self.vx = self.vy = 0
-               self.scrollbars()
-               
-       def getscrollbarvalues(self):
-               return self.vx, self.vy
-               
-       def scrollbar_callback(self, which, what, value):
-               if what == '-':
-                       delta = -1
-               elif what == '--':
-                       delta = -100
-               elif what == '+':
-                       delta = 1
-               elif what == '++':
-                       delta = 100
-                       
-               if which == 'x':
-                       if value:
-                               self.vx = value
-                       else:
-                               self.vx = self.vx + delta
-               else:
-                       if value:
-                               self.vy = value
-                       else:
-                               self.vy = self.vy + delta
-               self.wid.InvalWindowRect(self.ourrect)
-
-       def do_update(self, wid, event):
-               Qd.EraseRect(self.ourrect)
-               Qd.MoveTo(40, 40)
-               Qd.DrawString("x=%d, y=%d"%(self.vx, self.vy))
-
-class TestSW(Application):
-       def __init__(self):
-               Application.__init__(self)
-               self.num = 0
-               self.listoflists = []
-               
-       def makeusermenus(self):
-               self.filemenu = m = Menu(self.menubar, "File")
-               self.newitem = MenuItem(m, "New window...", "O", self.open)
-               self.quititem = MenuItem(m, "Quit", "Q", self.quit)
-       
-       def open(self, *args):
-               w = MyWindow(self)
-               w.open('Window %d'%self.num)
-               self.num = self.num + 1
-               self.listoflists.append(w)
-               
-       def quit(self, *args):
-               raise self
-
-       def do_about(self, id, item, window, event):
-               EasyDialogs.Message("""Test scrolling FrameWork windows""")
-
-def main():
-       App = TestSW()
-       App.mainloop()
-       
-if __name__ == '__main__':
-       main()
-