在uses里面引用DBClient (ClientDataSet1是你在设计时候已经跟服务器连接可以使用得组件)procedure TForm1.Button1Click(Sender: TObject); var a:TClientDataSet; begin a:=TClientDataSet.Create(application); a.RemoteServer:=ClientDataSet1.RemoteServer; a.ProviderName:='DataSetProvider4'; try if a.Active then begin DataSource1.DataSet:=a; DBGrid1.DataSource:=DataSource1; end; except end; end;
这个表每次都要清空,然后写入数据,然后用select,然后把内容在dbgrid中现出来
花费的时间很长
我的意思是能否这张表在内存中建,速度快些,
你试一下 Create #table吧
TClientDataSet.CreateDataSet
怎么用法?
DevExpress也有啊,也挺好的。
用这个可以不连接到数据库,而是存在于内存中。
(ClientDataSet1是你在设计时候已经跟服务器连接可以使用得组件)procedure TForm1.Button1Click(Sender: TObject);
var a:TClientDataSet;
begin
a:=TClientDataSet.Create(application);
a.RemoteServer:=ClientDataSet1.RemoteServer;
a.ProviderName:='DataSetProvider4';
try
if a.Active then
begin
DataSource1.DataSet:=a;
DBGrid1.DataSource:=DataSource1;
end;
except
end;
end;