Jan 18, 2002 #1 MASLK Programmer Joined Nov 4, 2001 Messages 2 Location LK hi! can anybody tell me how to return a ADO recordset object from a COM made with delphi any help would be appreciated. thanks MAS
hi! can anybody tell me how to return a ADO recordset object from a COM made with delphi any help would be appreciated. thanks MAS
Jan 18, 2002 #2 mikeEd Programmer Joined Nov 26, 2001 Messages 160 Location GB On the COM server end, you should have a method that takes a return parameter of type Code: VARIANT* , with a Code: retval modifier, so you have something like: Code: function TCOMADOObject.getDataSet(out returnRecordSet: OleVariant): HResult; begin ... returnRecordSet := ADODataSet1.RecordSet; end; On the client end, you should do something like this: Code: var recSet: OleVariant; begin COMObject.getDataSet(recSet); ADODataSet1.RecordSet := IUnknown(recSet) as _RecordSet; Upvote 0 Downvote
On the COM server end, you should have a method that takes a return parameter of type Code: VARIANT* , with a Code: retval modifier, so you have something like: Code: function TCOMADOObject.getDataSet(out returnRecordSet: OleVariant): HResult; begin ... returnRecordSet := ADODataSet1.RecordSet; end; On the client end, you should do something like this: Code: var recSet: OleVariant; begin COMObject.getDataSet(recSet); ADODataSet1.RecordSet := IUnknown(recSet) as _RecordSet;
Jan 18, 2002 Thread starter #3 MASLK Programmer Joined Nov 4, 2001 Messages 2 Location LK thanx a million mike appreciate the help ! Upvote 0 Downvote