I have code which queries a database, like this:
uses Data.DB, Data.Win.ADODB; // ... var cmd: TAdoCommand; r: _Recordset; firstName: string; begin cmd