Устанавливает в качестве возвращаемого значения библиотеки дату.
void _RetDateStr(char FAR *string) char FAR *string; /* Строка типа Date. */ |
Примечания
Строку даты следует задавать в формате mm/dd/year, в котором номер года может состоять как из двух, так из четырех цифр.
Для получения дополнительной информации о том, как создавать библиотеку API и интегрировать её в Visual FoxPro, смотрите Доступ к API Visual FoxPro.
Пример
В следующем примере символьная строка преобразуется в строку типа datе, которая возвращается в Visual FoxPro.
Код Visual FoxPro
![]() | |
---|---|
SET LIBRARY TO RETDATES ? DATES("02/16/95") && returns date {02/16/95} |
Код C
![]() | |
---|---|
#include <pro_ext.h> void FAR dates(ParamBlk FAR *parm) { MHANDLE mh; char FAR *instring; if ((mh = _AllocHand(parm->p[0].val.ev_length + 1)) == 0) { _Error(182); // "Insufficient memory" } _HLock(parm->p[0].val.ev_handle); instring = _HandToPtr(parm->p[0].val.ev_handle); instring[parm->p[0].val.ev_length] = '\0'; _RetDateStr(instring); _HUnLock(parm->p[0].val.ev_handle); } FoxInfo myFoxInfo[] = { {"DATES", (FPFI) dates, 1, "C"} }; FoxTable _FoxTable = { (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo }; |
Смотрите также
Справочное руководство
Процедура библиотеки API _RetChar( )Процедура библиотеки API _RetCurrency( )
Процедура библиотеки API _RetDateTimeStr( )
Процедура библиотеки API _RetFloat( )
Процедура библиотеки API _RetInt( )
Процедура библиотеки API _RetLogical( )
Процедура библиотеки API _RetVal( )
Прочие ресурсы
Конструкции библиотеки API
© Microsoft Corporation. All rights reserved. Microsoft is not reponsible for the contents of the translated help topics.