如何创建和使用TParameters？

Question

我正在尝试创建和使用TParameters，但由于AddParameter()方法返回NULL而遇到访问冲突。

这是我到目前为止的位置。这是在RAD Studio 10.1柏林上。

TParameters *FSQLParams = new TParameters(NULL, __classid(TParameter));
TParameter *Param = FSQLParams->AddParameter();

Param->DataType = ftString; // A/V since Param is NULL 
Param->Direction = pdInput;
Param->Name = "InOutStatus";

Param的值为NULL。