David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 1 | # Sample extension: zoom a window to maximum height |
| 2 | |
| 3 | import re |
| 4 | import sys |
Guido van Rossum | 36e0a92 | 2007-07-20 04:05:57 +0000 | [diff] [blame] | 5 | |
Kurt B. Kaiser | 2d7f6a0 | 2007-08-22 23:01:33 +0000 | [diff] [blame] | 6 | from idlelib import macosxSupport |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 7 | |
| 8 | class ZoomHeight: |
| 9 | |
| 10 | menudefs = [ |
| 11 | ('windows', [ |
| 12 | ('_Zoom Height', '<<zoom-height>>'), |
| 13 | ]) |
| 14 | ] |
Kurt B. Kaiser | 6655e4b | 2002-12-31 16:03:23 +0000 | [diff] [blame] | 15 | |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 16 | def __init__(self, editwin): |
| 17 | self.editwin = editwin |
| 18 | |
| 19 | def zoom_height_event(self, event): |
| 20 | top = self.editwin.top |
| 21 | zoom_height(top) |
| 22 | |
| 23 | def zoom_height(top): |
| 24 | geom = top.wm_geometry() |
| 25 | m = re.match(r"(\d+)x(\d+)\+(-?\d+)\+(-?\d+)", geom) |
| 26 | if not m: |
| 27 | top.bell() |
| 28 | return |
| 29 | width, height, x, y = map(int, m.groups()) |
| 30 | newheight = top.winfo_screenheight() |
| 31 | if sys.platform == 'win32': |
| 32 | newy = 0 |
| 33 | newheight = newheight - 72 |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 34 | |
| 35 | elif macosxSupport.runningAsOSXApp(): |
| 36 | # The '88' below is a magic number that avoids placing the bottom |
| 37 | # of the window below the panel on my machine. I don't know how |
| 38 | # to calculate the correct value for this with tkinter. |
| 39 | newy = 22 |
| 40 | newheight = newheight - newy - 88 |
| 41 | |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 42 | else: |
Kurt B. Kaiser | d0e2926 | 2002-12-20 01:22:01 +0000 | [diff] [blame] | 43 | #newy = 24 |
| 44 | newy = 0 |
| 45 | #newheight = newheight - 96 |
Kurt B. Kaiser | 6655e4b | 2002-12-31 16:03:23 +0000 | [diff] [blame] | 46 | newheight = newheight - 88 |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 47 | if height >= newheight: |
| 48 | newgeom = "" |
| 49 | else: |
| 50 | newgeom = "%dx%d+%d+%d" % (width, newheight, x, newy) |
| 51 | top.wm_geometry(newgeom) |