diff options
| -rw-r--r-- | Mac/Lib/test/tscrollwin.py | 86 |
1 files changed, 0 insertions, 86 deletions
diff --git a/Mac/Lib/test/tscrollwin.py b/Mac/Lib/test/tscrollwin.py deleted file mode 100644 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() - |