summaryrefslogtreecommitdiffstats
path: root/Mac/Lib/test/tlist.py
diff options
context:
space:
mode:
authorJack Jansen <jack.jansen@cwi.nl>2003-11-19 14:34:18 (GMT)
committerJack Jansen <jack.jansen@cwi.nl>2003-11-19 14:34:18 (GMT)
commit28ecf70db57828db2ca279643bf9aeca7662f35c (patch)
tree09b7767bbc411f85313b58d6fe7e5e67d9392973 /Mac/Lib/test/tlist.py
parent6045b9c93511c767f6cfa2d2fa299c76181acd9b (diff)
downloadcpython-28ecf70db57828db2ca279643bf9aeca7662f35c.zip
cpython-28ecf70db57828db2ca279643bf9aeca7662f35c.tar.gz
cpython-28ecf70db57828db2ca279643bf9aeca7662f35c.tar.bz2
Getting rid of support for MacOS9 and earlier. This is the first step,
and the biggest in size, but probably the easiest. Hunting through the source code comes next.
Diffstat (limited to 'Mac/Lib/test/tlist.py')
-rw-r--r--Mac/Lib/test/tlist.py92
1 files changed, 0 insertions, 92 deletions
diff --git a/Mac/Lib/test/tlist.py b/Mac/Lib/test/tlist.py
deleted file mode 100644
index 5b84fc5..0000000
--- a/Mac/Lib/test/tlist.py
+++ /dev/null
@@ -1,92 +0,0 @@
-# Test List module.
-# Draw a window with all the files in the current folder.
-# double-clicking will change folder.
-#
-# 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 *
-from Carbon import Win
-from Carbon import Qd
-from Carbon import List
-from Carbon import Lists
-import os
-
-class ListWindow(Window):
- def open(self, name, where):
- self.where = where
- r = (40, 40, 400, 300)
- w = Win.NewWindow(r, name, 1, 0, -1, 1, 0x55555555)
- r2 = (0, 0, 345, 245)
- Qd.SetPort(w)
- self.wid = w
- self.list = List.LNew(r2, (0, 0, 1, 1), (0,0), 0, w, 0, 1, 1, 1)
- self.list.selFlags = Lists.lOnlyOne
- self.filllist()
- w.DrawGrowIcon()
- self.do_postopen()
-
- def do_activate(self, onoff, evt):
- self.list.LActivate(onoff)
-
- def do_update(self, *args):
- self.list.LUpdate(self.wid.GetWindowPort().visRgn)
-
- def do_contentclick(self, local, modifiers, evt):
- dclick = self.list.LClick(local, modifiers)
- if dclick:
- h, v = self.list.LLastClick()
- file = self.list.LGetCell(1000, (h, v))
- self.where = os.path.join(self.where, file)
- self.filllist()
-
- def filllist(self):
- """Fill the list with the contents of the current directory"""
- l = self.list
- l.LSetDrawingMode(0)
- l.LDelRow(0, 0)
- contents = os.listdir(self.where)
- l.LAddRow(len(contents), 0)
- for i in range(len(contents)):
- l.LSetCell(contents[i], (0, i))
- l.LSetDrawingMode(1)
- l.LUpdate(self.wid.GetWindowPort().visRgn)
-
-
-class TestList(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):
- import macfs
- fss, ok = macfs.GetDirectory()
- if not ok:
- return
- w = ListWindow(self)
- w.open('Window %d'%self.num, fss.as_pathname())
- 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 the List Manager interface.
- Simple inward-only folder browser""")
-
-def main():
- App = TestList()
- App.mainloop()
-
-if __name__ == '__main__':
- main()
-