How to create and use TParameters?

Question

I am trying to create and use TParameters but run into an Access Violation because the AddParameter() method returns NULL.

This is where I am so far. This is on RAD Studio 10.1 Berlin.

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";

The value of Param is NULL.