home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 3 / Developers_Source_Vol_03_1996.iso / parad / aug94 / dgfig07b.gif < prev    next >
Graphics Interchange Format  |  1995-09-26  |  56.8 KB  |  477x354  |  8-bit (256 colors)
   ocr: - - CUSTOMEREHFOTmIEkeyPhysical nethod KeyPhysical(uar eventinfo Keyevent) var keyName String Key name of the key pressed targetobj Urobject Name of the target UI Object enduar if ewentinfo.iserefiltero) then : This code executes for each object on the form d1sableDerault Don't execute built-in default keyName = eventinfo.vchar0) Get the name of the key pressed ;If the Shift key was held doun when F1 was pressed, it's shoutine if eventinfo.isshiftkeyDoun() and keyName - "UK_ F1" then eventinfo-getlarget(targetob)) Get the target object nane applib.helpbisplay(targetob)) Call custom library net ...