300分！----求教三层实现公文包模式的例子！

[yuyulily]

我要在一个三层项目中使用公文包模式，但有很多问题，现300分！----求三层实现公文包模式的好用的例子！

[Libran]

用DataSetProvider(在服务器端)与ClientDataSet(在客户端)可以实现三层公文包模式。
当数据库文件有更新，可以用ReFresh方法更新本地数据。
要控制是否从数据库/文件读取数据，把FileName属性置为空，在调用LoadFromFile方法时用参数指定文件名。
从CDS文件中筛选数据可以设定过滤器(Filter)属性。

[土著巫师]

这个问题要好好讨论一下，帮你UP一下。说不定哪天就要用到的好东东。

[Libran]

设：
ClientDataSet->PacketRecords = -1;//一次返回全部记录
另外：
若ClientDataSet->PacketRecords = 0;//仅返回字段名，应该就是你的情况若ClientDataSet->PacketRecords = n;//n>0，一次返回前n条记录，需要时再向数据库请求

[yuyulily]

老大，我的PacketRecords 是 -1啊

[Libran]

刚试了一下，以下代码运行是可以的：
//连接数据库：
{
ClientDataModule->ClientDataSet2->Close();
ClientDataModule->ClientDataSet2->CommandText="TmpTbl";
ClientDataModule->ClientDataSet2->Open();
ShowMessage("Opened!");
}

//保存到文件，断开数据库连接：
{
ClientDataModule->ClientDataSet1->SaveToFile("aa");
ClientDataModule->ClientDataSet1->Close();
}

//打开本地文件：
{
//ClientDataModule->ClientDataSet1->Close();
ClientDataModule->ClientDataSet1->LoadFromFile("aa");
}

//刷新记录：
{
ClientDataModule->ClientDataSet1->Refresh();
}

我没加过滤条件，你应该及时将过滤条件清空或改为正确内容，或者不需要过滤时指定Filtered为fasle，否则也可能造成无记录显示

[Libran]

说明一下：
ClientDataModule是本地的DataModule名，ClientDataSet放在其上；
服务器端用的ADOTable，故ClientDataSet1->CommandText="TmpTbl"，TmpTbl为一表名；
以上代码中ClientDataSet2也应为ClientDataSet1；
数据库为MS SQL Server 2000。

[yuyulily]

我的PacketRecords=-1
void __fastcall TFormMain::Button4Click(TObject *Sender)
{
ClientDataSet1->Filtered=false;
ClientDataSet1->Refresh();
}
记录还是没有了？且本地文件没有编辑过，我是改了数据库中的数据，怎么回事啊？？

[Libran]

我试了，没问题呀！
你仔细查查看，是否哪里不小心加了限制条件什么的？

[yuyulily]

Libran() 我的确实是没有了，可以把你的例子发给我看看吗？

[pzoon]

老大，你的帖子很多么 ，我上来了（嘿嘿）；给我分吧！！！要500

[yuyulily]

pzoon(pzoon)：
问题解决，给你1000也没问题啊，呵呵

Libran() ：
我的信箱： [e-mail]

[pzoon]

好，这个问题不难，我来帮你问问，你的话一定算术呀

[yuyulily]

好啊，呵呵

[yuyulily]

谢谢Libran() 的帮助，先有你100分了，现在过滤没问题了，但我用：ClientDataSet->Refresh() 之后没有更新记录且CDS文件中原有的数据也没了，只剩下表的字段了，怎么回事啊？

[xiaoyu]

if(online)
{
clientDataSet->Open();
}
else
clientdataset->loadfromfile(...);

[Libran]

pzoon老弟，你够很，记得给我提成！

yuyulily：69年6月？真得尊称一声老兄了^_^给您作揖~~~

[yuyulily]

Libran() : 69年6月？真得尊称一声老兄了^_^给您作揖~~~


呵呵，此话怎讲啊？谁说我是69年6月的了？哈哈，那我不是都30多了？你的消息有误啊！

[Libran]

[e-mail]——6906？不是出身年月啊，那是我瞎猜了

[yuyulily]

哦，你是根据这个啊，那是我申请信箱是自动给编号啊，你也在加班？

[yuyulily]

Libran() :我再试试，有问题还得请教啊！老弟。~_~