0
0
mirror of https://github.com/python/cpython.git synced 2024-12-01 11:15:56 +01:00
cpython/Mac/Lib/test/tctl.py
Jack Jansen ae8a68f40c Trying again to check it in. Changes to:
- Use Universal Headers as input
- Change addpack calls to not depend on Guido's disklayout
- Checkge testprograms to use new names for some functions
1995-06-06 12:55:40 +00:00

21 lines
392 B
Python

# play with controls
from Dlg import *
from Ctl import *
from Win import *
from Evt import *
import time
import sys
def main():
r = (40, 40, 400, 300)
w = NewWindow(r, "The Spanish Inquisition", 1, 0, -1, 1, 0x55555555)
w.DrawGrowIcon()
r = (40, 40, 100, 60)
c = NewControl(w, r, "SPAM!", 1, 0, 0, 1, 0, 0)
print 'Ok, try it...'
sys.exit(1) # So we can see what happens...
main()