home *** CD-ROM | disk | FTP | other *** search
- # Toolbox window object interface
-
- from swi import *
- from toolbox import *
-
- strblk=block(64)
- eblock=block(4)
-
- class Window(TBObject):
- def getwimphandle(self):
- return swi(0x64ec6,"0i0;i",self.id)
- def getmenu(self):
- return swi(0x64ec6,"0i4;i",self.id)
- def settitle(self,title):
- return swi(0x64ec6,"0iis",self.id,11,title)
- def setextent(self,x0,y0,x1,y1):
- eblock[:]=[x0,y0,x1,y1]
- swi(0x64ec6,"0iib",self.id,15,eblock)
- def forceredraw(self,x0,y0,x1,y1):
- eblock[:]=[x0,y0,x1,y1]
- swi(0x64ec6,"0iib",self.id,17,eblock)
- def writeable_setvalue(self,n,value):
- swi(0x64ec6,"0iiis",self.id,512,n,value)
- def writeable_getvalue(self,n):
- global strblk
- s=swi(0x64ec6,"0iii0;.....i",self.id,513,n)
- if s>strblk.length:
- strblk.resize((s+3)/4)
- swi(0x64ec6,"0iiibi",self.id,513,n,strblk,strblk.length)
- return strblk.nullstring()
- def numberrange_getvalue(self,n):
- return swi(0x64ec6,"0iii;i",self.id,833,n)
- def optionbutton_setstate(self,n,value):
- swi(0x64ec6,"0iiii",self.id,196,n,value)
- def optionbutton_getstate(self,n):
- return swi(0x64ec6,"0iii;i",self.id,197,n)
- def popup_getmenu(self,n):
- return swi(0x64ec6,"0iii;i",self.id,705,n)
- def gadget_unfade(self,n):
- f=swi(0x64ec6,"0iii;i",self.id,64,n)
- swi(0x64ec6,"0iiii;i",self.id,65,n,f&0x7fffffff)
- def gadget_fade(self,n):
- f=swi(0x64ec6,"0iii;i",self.id,64,n)
- swi(0x64ec6,"0iiii;i",self.id,65,n,f|0x80000000)
- def stringset_selected(self,n,s):
- if type(s)==type(0):
- swi(0x64ec6,"1iiii",self.id,898,n,s)
- else:
- swi(0x64ec6,"0iiis",self.id,898,n,s)
- def stringset_avaliable(self,n,s):
- swi(0x64ec6,"0iiis",self.id,896,n,s)
- def stringset_getstring(self,n):
- global strblk
- s=swi(0x64ec6,"0iii0;.....i",self.id,899,n)
- print "s= ",s
- if s>strblk.length:
- strblk.resize((s+3)/4)
- swi(0x64ec6,"0iiibi",self.id,899,n,strblk,strblk.length)
- return strblk.nullstring()
- def stringset_getindex(self,n):
- return swi(0x64ec6,"1iii;i",self.id,899,n)
- def gettoolbars(self):
- return swi(0x64ec6,"iii;iiii",15,self.id,19)
-
-
-