windindance,可否说得更清楚一点 ？

Question

用
try
 except
如果是在IDE中运行，那么
Delphi主菜单Tools->Debugger Options->Language Exceptions->EVariantError 

Answer 1

var v:Variant;
if (Query.RecordCount >0) then
begin
  ...//在这儿写使用到字段的语句
  v := Query.FieldValues['field'];
//要判断v是否是NIL值，假如是NIL值，直接使用的话，就会有错误。
//BCB里是v.IsNull()，DELPHI里忘了，看一下HELP。
end;