RecordSet怎么转化为OleVariant

RecordSet如何转化为OleVariant
如题,分尽..

[解决办法]
这个？

var
Data: OleVariant;
begin
Data:=self.ADODataSet1.Recordset;