上一页 1 ··· 3 4 5 6 7 8 9 下一页

2010年1月4日

摘要: unit UDataConnPool; interface uses SysUtils, Classes, DB, ADODB, Contnrs, Windows, ExtCtrls; const//ole db provider c_sql='sqloledb'; c_access='microsoft.jet.oledb.4.0'; c_oracle='MSDAORA.1'; type// 数... 阅读全文

posted @ 2010-01-04 22:30 墨者工作室 阅读(1136) 评论(0) 推荐(0)

摘要: 1.与TTable、TQuery一样,TClientDataSet也是从TDataSet继承下来的,它通常用于多层体系结构的客户端。很多数据库应用程序都用了BDE,BDE往往给发布带来很大的不便,因而TClientDataSet最大的特点是它不依赖于BDE(Borland Database Engine),但它需要一个动态链接库的支持,这个动态链接库叫DBCLIENT.DLL。在客户端,也不需要用... 阅读全文

posted @ 2010-01-04 22:28 墨者工作室 阅读(3531) 评论(0) 推荐(0)

摘要: 昨天做程序突然想到的,如果您会使用内存表就不需要此例了,可以参考一下,代码如下://******************************************************************************// 函数功能: 执行SQL查询语句,影响ClientDataSet控件// 函数名称: cf_dbSelectSQL// 函数参数: var oClientD... 阅读全文

posted @ 2010-01-04 22:23 墨者工作室 阅读(2285) 评论(2) 推荐(0)

摘要: ADOQuery代替ClientDataSet做3-Tier系统2009年09月23日 星期三 11:163-Tier的系统我们一般用Midas的TClientDataSet,它搭配BDE的TQuery效率还可以,毕竟是一家的;但搭配TADOQuery就慢了很多,大概9倍,因为不晓得人家的资料存储格式,只能一个Field一个Field读出来再用TDataSetProvider打包成Data:OLE... 阅读全文

posted @ 2010-01-04 22:21 墨者工作室 阅读(2508) 评论(0) 推荐(0)

摘要: 属性 (Property) 介绍 Active: Boolean,当此 DataLink 连结至一个已开启的 DataSource 时会传回 True。当 Active 状态改变时会 触发ActiveChanged方法。 ActiveRecord: Integer(可读写),用来配置或取得 DataLink 缓冲区中目前所指向的记录代码,代码的范围是 0 .. BufferCount - 1。使... 阅读全文

posted @ 2010-01-04 22:09 墨者工作室 阅读(553) 评论(0) 推荐(0)

摘要: 如何有效刷新当前记录ADO的Recordset对象有一个Resync方法, 可以刷新不同范围的数据. 如果想刷新当前记录可以用如下的语句:var Rst: _Recordset;begin ... Rst.Resync(adAffectCurrent, adResyncAllValues); ...end;可惜delphi的TADODataSet没有封装这个功能. 如果要在TADODataSet刷... 阅读全文

posted @ 2010-01-04 22:01 墨者工作室 阅读(1590) 评论(0) 推荐(0)


2010年1月2日

摘要: SplitterBar的使用方法可以在窗体左边使用TREEVIEW,右边使用MEMO,可以使用SplitterBar来调节左右比例具体做法如下:1.设置TreeView的Align属性为alLeft.2.从FORM窗体上剪切(Ctrl-X)出MEMO控件3.增加一个Panel1控件,并将其Align属性为alClient.4.将MEMO贴回Panel1上,并将其Align属性为alClient.5... 阅读全文

posted @ 2010-01-02 21:04 墨者工作室 阅读(494) 评论(0) 推荐(0)

摘要: ----文件关联的目的是要实现某种扩展名的文件由相应的应用程序来打开,对于编写的应用软件来说,由于一般都有设计者特定的扩展名的数据文件,软件编制者应在程序中实现自动关联而不能由用户手工去实现。下面给出实现文件关联的实用程序。----实现文件关联的核心是对注册表的操作,所有的文件关联都在HKEY-CLASSES-ROOT下面,要实现文件关联必须在HKEY-CLASSES-ROOT中增加两个键值,一是... 阅读全文

posted @ 2010-01-02 21:02 墨者工作室 阅读(461) 评论(0) 推荐(0)

摘要: 在程序中实现打开浏览器,打开邮件程序的功能首先要在uses部分加入usesShellapi;接着在需要超级链接的地方使用SellExecute(handle,nil,pchar('mailto:guihong@163.net'),nil,nil,sw_shownormal);其中pchar()中的mailtos是打开邮件程序的,可以换成http://、ftp://、gopher://、new:、t... 阅读全文

posted @ 2010-01-02 21:01 墨者工作室 阅读(254) 评论(0) 推荐(0)

摘要: 一个替换指定串的函数,从一个字符串中找出指定子串,并替换为另一子串。functionreplacing(S,source,target:string):string;varsite,StrLen:integer;begin{source在S中出现的位置}site:=pos(source,s);{source的长度}StrLen:=length(source);{删除source字符串}delete... 阅读全文

posted @ 2010-01-02 20:59 墨者工作室 阅读(1092) 评论(0) 推荐(0)


上一页 1 ··· 3 4 5 6 7 8 9 下一页

博客园  ©  2004-2025
浙公网安备 33010602011771号 浙ICP备2021040463号-3