home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 3 / Developers_Source_Vol_03_1996.iso / parad / aug94 / btfig10b.gif < prev    next >
Graphics Interchange Format  |  1995-09-26  |  33.4 KB  |  573x303  |  8-bit (256 colors)
   ocr: CUSIDETRuFormlasetrocus nethod setFocus(var eventinfo Event) var f Form tc TCursor enduar if eventinfo.isPreFilter() then This code executes for each object on the form. else This code executes only for the form. if - F.attach("select Customer") then .dmattach(te,"Cust" amResyncr-cust",te) endif endif endMethod Edit Line: 10 Col: 44