so the sample code becomes ( using Delphi's attribute syntax )
TxxxDatabase = class(...)
...
[Engines(List='firebird,oracle,sybase-asa')]
property TransactionModel: TTransactionModel read FtransactionModel
write SetTransactionModel;
...
end;
--
Inoussa O.