blob: f2b99e96b25be021ffecfb60325bc0d22be9b310 [file] [log] [blame]
David Scherer7aced172000-08-15 01:13:23 +00001# Sample extension: zoom a window to maximum height
2
3import re
4import sys
5
6class ZoomHeight:
7
8 menudefs = [
9 ('windows', [
10 ('_Zoom Height', '<<zoom-height>>'),
11 ])
12 ]
Steven M. Gava72c3bf02002-01-19 10:41:51 +000013
David Scherer7aced172000-08-15 01:13:23 +000014 def __init__(self, editwin):
15 self.editwin = editwin
16
17 def zoom_height_event(self, event):
18 top = self.editwin.top
19 zoom_height(top)
20
21def zoom_height(top):
22 geom = top.wm_geometry()
23 m = re.match(r"(\d+)x(\d+)\+(-?\d+)\+(-?\d+)", geom)
24 if not m:
25 top.bell()
26 return
27 width, height, x, y = map(int, m.groups())
28 newheight = top.winfo_screenheight()
29 if sys.platform == 'win32':
30 newy = 0
31 newheight = newheight - 72
32 else:
33 newy = 24
34 newheight = newheight - 96
35 if height >= newheight:
36 newgeom = ""
37 else:
38 newgeom = "%dx%d+%d+%d" % (width, newheight, x, newy)
39 top.wm_geometry(newgeom)