TClientDataSet 错误：“缺少数据提供者或数据包”

Question

我正在 Delphi 的代码中创建 TClientDataSet 和 TDataSetProvider，并从 TUniQuery (Devart UniDAC) 加载数据。设置数据集提供者和客户端数据集的属性后，我尝试打开客户端数据集并得到运行时异常：“缺少数据提供者或数据包”。

我不确定它为什么会发生，如果有人能指出究竟是什么问题，我会很高兴。

这是我的代码：

//uq is a TUniQuery correctly set to an active TUniConnection

cdsFirstNames := TClientDataSet.Create(nil);
dspFirstNames := TDataSetProvider.Create(nil);
try
  uq.SQL.Text := 'SELECT * FROM firstnames;';
  uq.Prepared := True;
  // uq.Open;
  dspFirstNames.Name := 'dspFirstNames';
  dspFirstNames.DataSet := uq;
  cdsFirstNames.ProviderName := 'dspFirstNames';
  cdsFirstNames.Open;  // <--- Exception occurs here!
  uq.Close;
  showmessage(IntToStr(cdsFirstNames.RecordCount));

Answer 1

如果 DatasetProvider 没有所有者，则 ClientDataSet 无法获取对提供者的引用。

所以用

...Create(Self); 

而不是

...Create(nil);