Return to gpi.c CVS log

Up to [OS/2 SDKs] / pmsdk / samples / opendlg

Annotation of pmsdk/samples/opendlg/gpi.c, revision 1.1.1.1

1.1       root        1: /***************************************************************************\
                      2: * GPI.C -- GPI Helper routines
                      3: * Created by Microsoft Corporation, 1989
                      4: \***************************************************************************/
                      5: 
                      6: 
                      7: #define INCL_GPI
                      8: #include "tool.h"
                      9: 
                     10: /***************************************************************************\
                     11: * GetTextExtent helper function
                     12: \***************************************************************************/
                     13: 
                     14: ULONG CALLBACK GetTextExtent(HPS hps, PCH lpstr, int cch) {
                     15:     POINTL rgptl[TXTBOX_COUNT];
                     16: 
                     17:     if (cch) {
                     18:         GpiQueryTextBox(hps, (LONG)cch, lpstr, 5L, rgptl);
                     19:         return(MAKEULONG((SHORT)(rgptl[TXTBOX_CONCAT].x - rgptl[TXTBOX_BOTTOMLEFT].x),
                     20:                      (SHORT)(rgptl[TXTBOX_TOPLEFT].y - rgptl[TXTBOX_BOTTOMLEFT].y)));
                     21:     } else
                     22:         return(0L);
                     23:     }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.