home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 3 / Developers_Source_Vol_03_1996.iso / parad / mar94 / pb_fig07.gif < prev    next >
Graphics Interchange Format  |  1995-09-26  |  7.5 KB  |  648x363  |  4-bit (5 colors)
   ocr: POWERBAR:POWERBTNIEMOU" method nouseHigntDown(uar eventInfo MouseEvent) doDefault if Self.NUMBER.Uisible = True then SelF.NUMBER.RasterOperation = Sourcelnuert else Self.USERPIC.Rasteruperation = sourceinvert I endif ctrlkey - False shiftkey = False switch case eventinfo.isShiftKeyDown() : shiftkey = True case eventinfo.isControlkeyDown() : ctrlkey == True endSwitch endMethod Edit Line: 4 Col: 29