Помогите побороть ошибку
could not convert variant of type (null) into type (olestr)

В программе есть код

DM->adqTMP->Close();
DM->adqTMP->SQL->Text =
"SELECT top 1 'ПРОМО-КОД ДЛЯ РОЗІГРАШУ:' AS CheckTXT FROM SALES_GDS AS sg WITH (NOLOCK) INNER JOIN GOODS AS g WITH (NOLOCK) ON g.GOODS_ID = sg.GOODS_ID INNER JOIN MODEL AS m WITH (NOLOCK) ON m.MODEL_ID = g.MODEL_ID INNER JOIN GOODTYPE AS gt WITH (NOLOCK) ON gt.GOODTYPE_ID = m.GOODTYPE_ID WHERE sg.SHOPS_ID = 1057 AND sg.SALES_ID = 461052 AND gt.GOODTYPE_ID = 'TSH' AND GETDATE () < '2014-01-01'";
DM->adqTMP->Open();
DM->CheckTXT = new AsString;
DM->CheckTXT->Text=DM->adqTMP->FieldByName("CheckTXT")->Value;

Ошибка появляеться когда запрос возвращает пустое значение

wvetalanrrry,

Например, обработай запрос так, что если он возвращает null, то пусть он(запрос) возвращает вместо null пустую строку "".
Например в Oracle есть функция nvl.

Спасибо, помогло.