invalid variant operation 错误

[依赖太阳生存]

invalid variant operation

ADOQuery1->Open();
AnsiString cfh;
cfh=ADOQuery1->FieldValues["ssno"]+DateToStr(Date())+Edit2->Text;
an1= " select * from cure where ";
an1 +=" psno='"+Edit1->Text+"' and cfsno ='"+cfh+"'";
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add(an1);
求指教

[缘中人]

ADOQuery1->FieldValues["ssno"] Change To ADOQuery1->FieldByName("ssno")AsString

[勉励前行]

ADOQuery1->FieldValues["ssno"] 得到的是一个 Variant , 如果是 NULL 时，是不能转换成 String 的，就会抛出Variant 转换异常。 但是，使用 AsString 方法，得到的就是字符串，这时是无法区别出字段中是空字符串还是 NULL，NULL及空字符串，印象中一些数据库是没区别，一些有区别。