摘要：
datasnap 2010 心跳包,连接断开处理procedure TMainForm.DSServer1Connect(DSConnectEventObject: TDSConnectEventObject);var// RowIndx: Integer;InVal: TCP_KeepAlive;Ret: DWORD;ClientConnection: TIdTCPConnection;beginEnterCriticalSection(CSConnect);try // 最大连接数量，验证来访者密码 if (ConnectCount >= 500) or (DSConnectE... 阅读全文
摘要：
1、如何用SQL获取一个数据库中的所有表的名称;SELECT * FROM sysobjects WHERE xtype='u' 2、如何用SQL获取一个表中所有字段的名称; 1 SELECT c.name,o.name FROM syscolumns AS c 2 INNER JOIN sysobjects AS o 3 ON c.id = o.id select name from sysobjects where xtype='U'select name from syscolumns where id=object_id(N'表明') S 阅读全文
摘要：
Borland DataSnap（MIDAS）三层架构编程中，主细表的处理方式一般有两种方式：1. 传统的Master/Detail设置：设置细表ClientDataSet的MasterSource和MasterFields属性即可。注：如果只用于浏览数据，则可以用这种方式。用嵌套表方式――细表作为主表的一个DataSetField字段注意：（1） 当需要向数据库应用更新时必须用这种方式。（2） 设置为这种方式后a） 主表ClientDataSet若Open，则会Open所有关联ClientDataSet；b） 主表ClientDataSet若Close，则会Close所有关联ClientDa 阅读全文
摘要：
Delphi报表开发ReportMachine的小计和总计的计算2011年7月2日 分类: Delphi, 开发笔记最近在做一个Delphi的发货清单的打印程序，其中涉及到需要计算清单的小计和总计的功能，文字难以表达清楚，上图吧：报表第一页的小计计算当前页面的商品价格总和，总计目前和小计一样是计算截止到当前页面的所有商品的金额和，下图为最后一页：这下大家明白了吧，就是要实现这样的报表。废话不多说了，开始讲解我的思路：1.既然要计算小计，就是每页的金额和了，加入ReportMachine的计算文本框（TRMCalcMemoView），然后设置要汇总的字段值为数据字段“factSum”，然后选择计 阅读全文
摘要：
Delphi IDE 本身就是一个插件模式的工具，插件的好处不用多说。运行包的BPL，其实就是众多单元的集合，因此可以再次重新组合，只要你将各个BPL包用到的单元再组合一次！本文以 http://code.google.com/p/tangram-plugin-framework/插件框架自带的BPL包合并向导工具做一次图文介绍！1、安装好开源插件框架 tangram-plugin后，然后点击 菜单 File->New->Others，找到tangram FrameWork里的包合并向导，2、Dev控件堪称独孤求败，最强也是最肥的数据库解决方案。我们以Dev套件包为准，合并Dev几 阅读全文
摘要：
假如写成线程方法效果更好，共享！先导入SQLDMO生成SQLDMO_TLB.pas文档unit Unit3;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs,SQLDMO_TLB, StdCtrls, ComCtrls,comobj;typeTForm3 = class(TForm)Button1: TButton;ProgressBar1: TProgressBar;procedure Button1Click(Sender: TObject);priv 阅读全文
摘要：
为RB定制支持参数的自定义函数 通过昨天的短文,检阅过的朋友已经了解如何为Report Builder的RAP建立一个简单的自定义函数,同时我亦提到,发挥自已的想象力,就可以将诸多的Delphi原生代码呈现给你的用户,当然也包括你自身,站在用户角度去完成应用报表的最终定义,从而将编程与应用分为,减少开发者的麻烦。在我的编程经历中,最讨厌的就是为用户画报表,太无聊亦无意义的事情,莫过如此。我宁愿花几小时的时候去调试我的代码,也不愿花10分钟去为用户画一个报表。不知道你有没有同感……正因为如此,所以我想尽可能的通过自定义函数的形式,去增加用户可用的报表定义功能,是一件非常用意义的事情。 为了感谢大 阅读全文
摘要：
前几日，网友Miracle提到此问题，由于自己也被此问题困扰过，因此决心实现一下；此外，对于这个问题，我想在应用中如果用到了RB并使用了她的最终用户方案即RAP技术，那么这个问题也肯定会遇到。具体来说也就是这样一种情况：假若在一个应用中可能有几个全局的变量，我们想在RB的报表中体现出来，作为报表的内容，怎么实现？ 没想到，原来RB对此在其RAP技术中已经支持的非常完善，在参考了其demo及help文档，很容易就实现了，因此，相信你也能：），当然，在你继续看下去之前，应该知道什么是Report Builder以及RAP，并且在你的应用中已经用到，要不然，你可能困难了。实现方法先确定一下我们要实. 阅读全文
摘要：
--超级通用型分页存储过程--可对Select语句进行分页，可带order、group等子句--KeyField（关键词）可以为空，也可以由多个，用，间隔--使用Keyfield可以进行缓冲更新模式--Dcopyboy义乌科创计算机有限公司软件部--2012-01-08----------CREATEprocGetData@SQLSTRvarchar(8000),@KeyFieldvarchar(500),@PageNoint,@PageSizeintasbeginDECLARE@posint,@SQLSTR1varchar(8000),@SQLSTR2varchar(50)set@SQLST 阅读全文