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
This commit is contained in:
Jack Jansen 1995-06-06 12:55:40 +00:00
parent c7cfb95559
commit ae8a68f40c
16 changed files with 466 additions and 284 deletions

View file

@ -1,12 +1,12 @@
# Progress dialog
from addpack import addpack
addpack('Demo')
addpack('Tools')
addpack('bgen')
addpack('dlg')
addpack('evt')
from Dlg import GetNewDialog, ModalDialog, SetIText
from Dlg import GetNewDialog, ModalDialog, SetDialogItemText
count = 0
@ -17,12 +17,12 @@ def filter(d, e):
def main():
d = GetNewDialog(256, -1)
tp, h, rect = d.GetDItem(2)
SetIText(h, "Progress...")
tp, h, rect = d.GetDialogItem(2)
SetDialogItemText(h, "Progress...")
for i in range(100):
if i%10 == 0:
str = "Progress...%d" % i
SetIText(h, str)
SetDialogItemText(h, str)
ModalDialog(filter)
for j in range(100): pass

View file

@ -5,6 +5,7 @@ from Ctl import *
from Win import *
from Evt import *
import time
import sys
def main():
r = (40, 40, 400, 300)
@ -12,6 +13,8 @@ def main():
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()

View file

@ -3,6 +3,9 @@
# Python library.
# The ID can be overridden by passing a second parameter.
import addpack
addpack.addpack(':Tools:bgen:evt')
from Dlg import *
from Events import *
import string
@ -17,8 +20,8 @@ def f(d, event):
def message(str = "Hello, world!", id = ID):
d = GetNewDialog(id, -1)
tp, h, rect = d.GetDItem(2)
SetIText(h, str)
tp, h, rect = d.GetDialogItem(2)
SetDialogItemText(h, str)
while 1:
n = ModalDialog(f)
if n == 1: break