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
26 geom
= top
.wm_geometry()
27 m
= re
.match(r
"(\d+)x(\d+)\+(-?\d+)\+(-?\d+)", geom
)
31 width
, height
, x
, y
= map(int, m
.groups())
32 newheight
= top
.winfo_screenheight()
33 if sys
.platform
== 'win32':
35 newheight
= newheight
- 72
38 newheight
= newheight
- 96
39 if height
>= newheight
:
42 newgeom
= "%dx%d+%d+%d" % (width
, newheight
, x
, newy
)
43 top
.wm_geometry(newgeom
)