Возвращает байт атрибута для заданного индекса цвета в цветовой схеме указанного окна.
int _WAttr(WHANDLE wh, int color) WHANDLE wh; /* Дескриптор окна. */ int color; /* Индекс цвета. */ |
Пример
Следующий пример перебирает все цвета каждой цветовой схемы, показывая на экране соответствующий байт атрибута, возвращаемый _WAttr( ).
Код Visual FoxPro
![]() | |
---|---|
SET LIBRARY TO WATTR |
Код 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 WAttrEx(ParamBlk FAR *parm) { int scheme; int color; WHANDLE wh; int attrib, savePen; for (scheme = 0; scheme <= 25; scheme++) { wh = _WOpen(2, 10, 23, 70, WEVENT, scheme, (Scheme FAR *) 0, WO_SYSTEMBORDER); for (color = WA_NORMAL; color <= WA_ISSHADOW; color++) { attrib = _WAttr(wh, color); savePen = _WAttr(_WGetPort(), WA_PENCOLOR); _WSetAttr(_WGetPort(), WA_PENCOLOR, attrib); _PutStr("\nScheme:"); putLong(scheme, 5); _PutStr("; Color:"); putLong(color, 5); _PutStr("; Attribute byte:"); putLong(attrib, 5); _WSetAttr(_WGetPort(), WA_PENCOLOR, savePen); } _WClose(wh); _Execute("WAIT"); } } FoxInfo myFoxInfo[] = { {"ONLOAD", (FPFI) WAttrEx, CALLONLOAD, ""}, }; FoxTable _FoxTable = { (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo }; |
Смотрите также
Задачи
Пример изменения атребутов шрифтаСправочное руководство
Процедура библиотеки API _WSetAttr( )Прочие ресурсы
Конструкции библиотеки APIДоступ к API Visual FoxPro

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