Возвращает дескриптор WHANDLE окна, которое в данный момент выбрано для пользовательского вывода.
WHANDLE _WGetPort(void any) void any; /* Указатель. */ |
Пример
В следующем примере отображается дескриптор окна, возвращаемый процедурой _WGetPort( ) при изменении текущего окна вывода.
Код Visual FoxPro
![]() | |
---|---|
SET LIBRARY TO WGETPORT |
Код C
![]() | |
---|---|
#include <pro_ext.h> void putLong(long n, int width) { Value val; val.ev_type = 'I'; val.ev_long = n; val.ev_width = width; _PutValue(&val); } FAR Example(ParamBlk FAR *parm) { WHANDLE wh; WHANDLE oldPort; wh = _WOpen(2,10,23,70,WEVENT | CLOSE,WINDOW_SCHEME,(Scheme FAR *)0, WO_SYSTEMBORDER); _WShow(wh); _PutStr("\n1) _WGetPort() ="); putLong(_WGetPort(), 10); oldPort = _WSetPort(wh); _PutStr("\n2) _WSetPort(wh) ="); putLong(oldPort, 10); _PutStr("\n3) _WGetPort() ="); putLong(_WGetPort(), 10); oldPort = _WSetPort(oldPort); _PutStr("\n4) _WSetPort(oldPort) ="); putLong(oldPort, 10); _PutStr("\nShould be back where we started."); } FoxInfo myFoxInfo[] = { {"ONLOAD", (FPFI) Example, CALLONLOAD, ""}, }; FoxTable _FoxTable = { (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo }; |
Смотрите также

c Microsoft Corporation. All rights reserved. Microsoft is not reponsible for the contents of the translated help topics.