Структура, содержащая данные об ошибке
type TDbaErrorInfo = record Code: integer; Msg: String; Sql: String; end;