Возвращает текущую величину смещения курсора в файле, открытом в окне редактирования.
EDPOS _EdGetPos(WHANDLE wh) WHANDLE wh; /*Дескриптор окна редактирования.*/ |
Замечания
Если в окне есть выделенный текст, _EdGetPos( ) возвращает величину смещения точки привязки.
Для более подробной информации о том, как создавать библиотеку API и интегрировать её в Visual FoxPro смотрите Доступ к API Visual FoxPro.
Пример
В следующем примере открывается сеанс редактирования для файла, заданного параметром. После установки текущей позиции курсора с помощью _EdSetPos( ) вызывается программа _EdGetPos( ), чтобы проверить правильность возвращаемой ею величины смещения позиции курсора. Затем с помощью _EdSelect( ) выделяется текст и вызывается программа _EdGetPos( ), чтобы проверить правильность возвращаемой ею позиции точки привязки.
Код Visual FoxPro
Скопировать код | |
---|---|
SET LIBRARY TO EDGETPOS = EDGETPOS("x") |
Код C
Скопировать код | |
---|---|
#include <pro_ext.h> void putLong(long n) { Value val; val.ev_type = 'I'; val.ev_long = n; val.ev_width = 6; _PutValue(&val); } FAR Example(ParamBlk FAR *parm) { #define pFILENAME ((char FAR *) _HandToPtr(parm->p[0].val.ev_handle)) WHANDLE wh; EDPOS edpos; if (!_SetHandSize(parm->p[0].val.ev_handle, parm->p[0].val.ev_length+1)) { _Error(182); // "Insufficient memory" } pFILENAME[parm->p[0].val.ev_length] = '\0'; _HLock(parm->p[0].val.ev_handle); wh = _EdOpenFile(pFILENAME, FO_READONLY); _HUnLock(parm->p[0].val.ev_handle); _EdSetPos(wh, 19); _PutStr("\n_EdSetPos(wh, 19)"); edpos = _EdGetPos(wh); _PutStr("\n_EdGetPos(wh) ="); putLong(edpos); _EdSelect(wh, 5, 12); _PutStr("\n_EdSelect(wh, 5, 12)"); edpos = _EdGetPos(wh); _PutStr("\n_EdGetPos(wh) ="); putLong(edpos); } FoxInfo myFoxInfo[] = { {"EDGETPOS", (FPFI) Example, 1, "C"}, }; FoxTable _FoxTable = { (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo }; |
Смотрите также
Справочное руководство
_EdGetChar( ) процедура библиотеки API_EdSetPos( ) процедура библиотеки API
_EdGetLinePos( ) процедура библиотеки API
Прочие ресурсы
API Library Construction© Microsoft Corporation. All rights reserved.
Перевод выполнен SAM-FoxPro