gr_getge.gml

来自「开放源码的编译器open watcom 1.6.0版的源代码」· GML 代码 · 共 28 行

.gfunc getgtextextent
.if '&lang' eq 'C' .do begin
short _FAR _getgtextextent( char _FAR *text );
.do end
.el .do begin
integer*2 function _getgtextextent( text )
character*(*) text
.do end
.gfuncend
.desc begin
The &func &routine returns the length in pixels of the argument
.arg text
as it would be displayed in the current font by the &routine
.kw _outgtext.
Note that the text is not displayed on the screen, only its length
is determined.
.desc end
.return begin
The &func &routine returns the length in pixels of a string.
.return end
.see begin
.seelist &function. _registerfonts _unregisterfonts _setfont _getfontinfo _outgtext _setgtextvector _getgtextvector
.see end
.grexam begin eg_getfi.&langsuff
.grexam end
.class &grfun
.system