Destroying TADODataset created in runtime
问题 I have a function that returns a TADODataset object: // inside DataModule: function TDM.GetWorkstationsList: TADODataset; var DS: TADODataSet; begin DS := TADODataSet.Create(nil); DS.Connection := MyConnection; // MyConnection is TADOConnection DS.CommandType := cmdText; DS.CommandText := 'SELECT * FROM Workstation'; DS.Active := True; Result := DS; end; This is how I plan to use it: // inside main form: tvWorkstation.DataController.DataSource.DataSet := DM.GetWorkstationsList; //