bcb中TParamter传NULL值

if (status_Desc.IsEmpty())
Queue_Status->Value = Null();
else
Queue_Status->Value = status_Desc;
qry->ExecSQL();