1 # Sample extension: zoom a window to maximum height
10 ('_Zoom Height', '<<zoom-height>>'),
15 '<<zoom-height>>': ['<Alt-F2>'],
18 '<<zoom-height>>': ['<Control-x><Control-z>'],
21 def __init__(self
, editwin
):
22 self
.editwin
= editwin
24 def zoom_height_event(self
, event
):
25 top
= self
.editwin
.top
29 geom
= top
.wm_geometry()
30 m
= re
.match(r
"(\d+)x(\d+)\+(-?\d+)\+(-?\d+)", geom
)
34 width
, height
, x
, y
= map(int, m
.groups())
35 newheight
= top
.winfo_screenheight()
36 if sys
.platform
== 'win32':
38 newheight
= newheight
- 72
41 newheight
= newheight
- 96
42 if height
>= newheight
:
45 newgeom
= "%dx%d+%d+%d" % (width
, newheight
, x
, newy
)
46 top
.wm_geometry(newgeom
)