VPF::OleVariant is null - Форум программистов

Prehistorik

Дата 20.9.2006, 13:25 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 146
Регистрация: 30.5.2006
Где: СПб

Репутация: нет
Всего: 3

Код


var
  cmd: TAdoCommand;
  str: WideString;
  rs: _Recordset;
begin
  //... Инициализация.
  cmd.CommandText := 'select MY_TEXT from MY_TABLE where MY_ID = 1';
  rs := cmd.Execute;
  str := rs.Fields[0].Value;    //<--- Косячок-с

Если в базе записан нул, то выкидывается эксепшн конвертации. Как проверить rs.Fields[0].Value Нул или не нул?!

--------------------

Есть только один бог - Ассемблер, и С - пророк его.

Alexeis

Дата 20.9.2006, 13:32 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 109
Всего: 459

Цитата(Prehistorik @ 20.9.2006, 13:25

)

Как проверить rs.Fields[0].Value Нул или не нул?!

Носколько я помною nil соответствует значение ноль в памяти.

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

Elfebet

Дата 20.9.2006, 13:35 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 545
Регистрация: 15.5.2006
Где: Украина. Запорожь е.

Репутация: 2
Всего: 14

if (rs.Fields[0].Value=nil) then ....
или
if (not assigned(rs.Fields[0].Value)) then ...
ну накрайня мона так
try
str := rs.Fields[0].Value;
except
// если ошибка, то что-то делаем
end;

Это сообщение отредактировал(а) Elfebet - 20.9.2006, 13:37

--------------------

Программист не должен всё знать... он должен знать где можно посмотреть

ShadeSt

Дата 20.9.2006, 14:00 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 256
Регистрация: 9.8.2005
Где: Россия, г. Ставро поль

Репутация: нет
Всего: 7

Assigned() вроде как для проверки указателей на nil, точнее не <> nil
а для OleVariant:

Код


Unassigned
VarIsEmpty()
Null
VarIsNull()

если я ничего не путаю.

--------------------

Bose

Дата 20.9.2006, 14:17 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1458
Регистрация: 5.3.2005
Где: Riga, Latvia

Репутация: 23
Всего: 51

Prehistorik,
rs.Fields[0].IsNull

smile

--------------------

Лучшее о Delphi за 2013 год. Подборка ссылок.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »