Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.11.19;
Скачать: CL | DM;

Вниз

В чем разница между VarIsEmpty(NewVal) и VarIsNull(NewVal) ?   Найти похожие ветки 

 
kyn66 ©   (2006-09-21 12:15) [0]

Уважаемые мастера, помогите разобраться в данной ситуации. При добавлении или редактировании данных в таблице использую следующий код:

var
 NewVal, TmpVal  : Variant;
begin
 NewVal := ClientTblDoccod.NewValue;
 TmpVal := ClientTblDocser.NewValue;
 if ((not VarIsEmpty(NewVal)) or (not VarIsNull(NewVal))) and
    (NewVal = "01") and
    ((not VarIsEmpty(TmpVal)) or (not VarIsNull(TmpVal))) then
    St.Append("Сообщение об ошибке");
end;


Может что не так с синтаксисом? Если в режиме редактирование ставлю пустым поле для TmpVal, или оно изначально пустое, то срабатывает добавление ошибочного сообщения. Т.е. оно не должно добавляться, когда NewVal = "01" и TmpVal - пустое, а оно всеравно добавляется.


 
ЮЮ ©   (2006-09-21 12:27) [1]

когда NewVal = "01" и TmpVal - пустое оно и не NULL тоже.

((not VarIsEmpty(TmpVal)) or (not VarIsNull(TmpVal)))  всегда ИСТИНА


 
ЮЮ ©   (2006-09-21 12:39) [2]

NULL и Unasigned это ещё два возможных значения для Variant
VarIsEmpty(Unasigned) = true и false для других значений variant
VarIsNull(NULL) = true и false для других значений variant
Ни один variant не может быть сразу и NULL и Unasigned, поэтому
((not VarIsEmpty(TmpVal)) or (not VarIsNull(TmpVal))) ИСТИННО для люблго значения  TmpVal


 
umbra ©   (2006-09-21 15:23) [3]

VarIsClear(TmpVal) or VarIsClear(NewVal) or (NewVal = "01")



Страницы: 1 вся ветка

Текущий архив: 2006.11.19;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.04 c
5-1142590419
Priest
2006-03-17 13:13
2006.11.19
Картинка в дочернем компоненте


1-1160121293
DVM
2006-10-06 11:54
2006.11.19
Динамическое создание форм на закладках PageControl. Вопрос.


6-1148946937
nikitian
2006-05-30 03:55
2006.11.19
Проблема с кодировкой в indySMTP


15-1162072591
Petr V.Abramov
2006-10-29 01:56
2006.11.19
Исключения в .Net


2-1162397653
Godness
2006-11-01 19:14
2006.11.19
Html парсер для Delphi5