| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TTable, TTable.Filter [D7, dBase, FoxPro]
Alexander Smith © (2004-02-13 01:22:00)
Здравствуйте все.
Если не влом и не сложно, то помогите.
Вопрос №1.
Итак.
Инициализируем фильтр таблички.
Table1.Filter="(FIO="+QuotedStr(Crypt(IncomingValue0)+"*")+")";
if (a>2) then
Table1.Filter="and (DEP="+QuotedStr(Crypt(IncomingValue1)+"*")+")";
if (a>4) then
Table1.Filter="and (ACCOUNT_BALLANCE="+QuotedStr(Crypt(IncomingValue2)+"*")+")";
Table1.Filtered:=True;
Допустим результатом фильтрации является пустая таблица.
Как мне это увидеть - какое св-во или событие возникает при этом ?
ВНИМАНИЕ! RecNo и всем с ним связанное не предлагать!
Вопрос №2.
Возникает ошибка"Could not convert variant of type (Null) into type (String)".
Возникает в этой строчке
Text:=Sender.Value;
где Text - var String, Sender.Value - значение некого поля Table1 которое для рисования в DBGrid по событию OnGetText изменяется в соответствующей процедуре.
Каким If-ом мне отследить то, что Sender.Value имеет Type Null, если вообще оно Type Variant.
т.е.
If not(логическое выражение) then
begin
Test:=Sender.Value
...
end
else
begin
...
end;
Заранее спасибо.
С уважением.
Alexander Smith (2004-02-13 13:28:00) [1]
Всем огромное спасибо. Все помогло.
bykopor (2004-02-13 10:00:00) [2]
TField.Text-
можна еще
TField.AsString- но при етом может вызыватся такая же ошибка
Silver Alex (2004-02-13 09:23:00) [3]
1.Dataset.IsEmpty
2.VarIsNull(v) проверяет или v не null
Sirgfine (2004-02-13 06:59:00) [4]
На вопрос 1
...
Table1.First;
Table1.Eof;
...
если первая запись является окончанием (не последней, а кончанием), то таблица точно пустая.
Ещё можешь проверить значение в столбце, который не может быть пустым, но это сложнее и он может быть единственным пустым в строке...
Кщд (2004-02-13 06:40:00) [5]
правильнее TField.IsNull, imho
>RecNo и всем с ним связанное не предлагать!
это почему?
SPIRIT (2004-02-13 06:36:00) [6]
> Возникает ошибка "Could not convert variant of type (Null)
> into type (String)".
if sender.value<>null then *************
| |
