home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 3 / Developers_Source_Vol_03_1996.iso / parad / oct94 / mp_fig18.gif < prev    next >
Graphics Interchange Format  |  1995-09-26  |  17.7 KB  |  801x600  |  4-bit (9 colors)
   ocr: Paradox for' Windows File Edit Language Debug Properties Window Help : % - DLLCALLEHFOrml:Uses Uses USER t DE Form Design : DLLCALL. V getClientRect(hund CWORD, IpRect CPTR) enduses Call appSize Edit Linel 1 Col1 l DLLCALLEHFOTml.appsize method appSize() Point var app Application ststruct String endUar ststruct == "00000000" getClientRect(app.windowclientHandle(),ststruct) return pixelsToTwips(point(ansicode(ststruct.substr(5)) + ansiCode(ststruct.substr(6)) * 256, ansiCode(ststruct.substr(7)) + ansicode(ststruct.su)) * 256)) endMethod - Edit Line 4 Col18 #Text4 [Text]