CURDATE EXISTS — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) (Новая страница: «= Смотрите также = Полезные функции Функции Delphi») |
Hisava (обсуждение | вклад) м |
||
| Строка 1: | Строка 1: | ||
| + | [[CURDATE_EXISTS]] - это программа из справочника [[R266]] | ||
| + | Проверка на наличие переменной CurDate | ||
| + | CURDATE_EXISTS([Нужно ли сообщение про Господ = Да]) | ||
| + | = Текст = | ||
| + | Parameters with_msg:=.t. | ||
| + | result:=CToD(' / / ') | ||
| + | if Type('CurDate')='D'; result:=CurDate | ||
| + | elseif with_msg | ||
| + | Message('Господа, CurDate не определена.'+chr(13)+chr(10)+; | ||
| + | 'Задавайте дату в качестве параметра функции '+atr(ProcPrevName)+'.') | ||
| + | endif | ||
= Смотрите также = | = Смотрите также = | ||
[[Полезные функции]] | [[Полезные функции]] | ||
[[Функции Delphi]] | [[Функции Delphi]] | ||
Текущая версия на 14:18, 30 октября 2017
CURDATE_EXISTS - это программа из справочника R266
Проверка на наличие переменной CurDate
CURDATE_EXISTS([Нужно ли сообщение про Господ = Да])
Текст
Parameters with_msg:=.t.
result:=CToD(' / / ')
if Type('CurDate')='D'; result:=CurDate
elseif with_msg
Message('Господа, CurDate не определена.'+chr(13)+chr(10)+;
'Задавайте дату в качестве параметра функции '+atr(ProcPrevName)+'.')
endif
