Показать сообщение отдельно
  #8  
Старый 13.09.2012, 10:37
kerby666 kerby666 вне форума
Прохожий
 
Регистрация: 12.09.2012
Сообщения: 20
Репутация: 10
По умолчанию

Цитата:
Сообщение от poli-smen
Вот так можно перекачать данные из обычного Query в виртуальную ClientDataSet:
Код:
uses ..., MidasLib, Provider;

...
procedure TForm1.Button1Click(Sender: TObject);
var
  Provider: TDataSetProvider;
begin
  Provider := TDataSetProvider.Create(nil);
  try
    Provider.DataSet := Query1;
    ClientDataSet1.Data := Provider.Data;
  finally
    Provider.Free;
  end;
end;
А как из ClientDataSet1.Data перелить в DBGrid?
Ответить с цитированием