procedure ExecuteComplete(RecordsAffected: Integer; const pError: Error; var adStatus: EventStatusEnum; const pCommand: _Command; const pRecordset: _Recordset; const pConnection: _Connection); safecall;

__fastcall ExecuteComplete(int RecordsAffected, const Error pError, EventStatusEnum adStatus, const _Command pCommand, const _Recordset pRecordset, const _Connection pConnection);